Burroughs 


B 6700/B 7700 


APL/700 
USER REFERENCE MANUAL 


8 


Burroughs Corporation 
Detroit, Michigan 48232 


$3.00 


Printed in U.S. America 1 April 1974 


5000813 


COPYRIGHT (c) 1974 BURROUGHS CORPORATION 


Burroughs Corporation believes the program described in this 
manual to be accurate and reliable, and much care has been 
taken in its preparation. However, the Corporation cannot 
accept any responsibility, financial or otherwise, for any con- 
sequences arising out of the use of this material. The infor- 
mation contained herein is subject to change. Revisions may 
be issued to advise of such changes and/or additions. 


PROPRIETARY INFORMATION - NOT FOR PUBLICATION 


The information contained in this document is proprietary 
to Burroughs Corporation and is not to be reproduced: or dis- 
closed without written release from the Patent Division of 


Burroughs Corporation. 


THIS DOCUMENT IS THE PROPERTY OF AND SHALL BE RETURNED 
TO BURROUGHS CORPORATION, BURROUGHS PLACE, DETROIT, MICHIGAN 
48232. 


Table of Contents 


Section Title Page’ 
INTRODUCTL ON @ @ e e@ e e ® e & & e e e @ e e Vil 
1 APL/700 SYSTEM DESCRIPTION .... «6 « « « « 


General .« « «© « «© «© © © © © © © © © © © «@ 
Properties and Features . .« »« « « « «© « « 
Use RequirementS . +6 « « «© « « « # « « « 
APL/700 Interactive Environment .... - 
Data Elements and Objects . . .. «6 »« » « 
Usage Modes .« « « « «© «© « © «© © © © © @ «@ 
Components of APL Languag o 2 2 © © © 28 
Constants and Variables . . .. »« « « 
Functions « « « e« « « © « «© «© #® © « »® 
Primitive Functions and Operators 

User Defined Functions. « »« « « .« 

Control Structures ...« « « « 6 « « 
Workspaces, Library, and Files .... . 
self Protection .« « « « »« «© « «© « « » 
Security and Sharing ...». »#« « » e 


!optdst 4d 
FOO 


A ee 
HEE HO OONNNAEWNHYDNH 


2 TNTERACTING WITH APL/700 4... +6 « © «© «© # « 
General .« «© « « «© «© © 2® 8» © © © © #0 #© #® »@ 
Accessing the System . ..« « « © © « « « 

APL Terminal Keyboard Configurations. 
APL Character/Symbol Set. ... e 
Functional Keys/Bars. . . . « e e 

Basic Implementation Operations . .. ». « 

Typing Rules/Conventions 2 © © © © 

Sign-on Procedure . .« « »« « © «© »# » e 

Transaction Procedure .« . « »« »« « » » 

Sign-Off Procedure . . . =. »« » « « » 

Recovery Operations . »« «6 »« « « #« « » 

Transaction Editing . . s« »« « » » o » 
Correcting In-Process Typing 


se 


YVNNNNYNNYNVNN NN DL 
RPRERPON FE EUNEPRER 


Errors oer te ee a Se Se. Re 2-12 
Transaction Editing Procedure . . 2-12 
Examples of Attention Key 
ApplLiGations. 4 «& ws & «3 2-14 
Input/Output Communication Functions. 2-15 
3 THE APL/700 LANGUAGE 4.4% 6 s © © @ © © & ® % 3-1 
GONIOTaAL oo «. 6 @: «2: wi Sr @. “Me es RB Se Se 6 “ee tS 3=1 
Language Elements . . »« »« » « « # #» » # » 3-1 
Data Elements . .« « «© «© © © © #8 © e« » 3-1 
Order of Execution . . . 8» «© # « » » 3-3 


iii 


Table of Contents (cont) 


Section Title 


3 Primitive Functions and Operators .. . 
Assignment Primitive Function... 
Selection Primitive Function .. . 
Dyadic and Monadic Scalar Primi- 
tive Functions a tet. WS Oe 
Extension of Dyadic Scalar and 
Monadic Scalar Functions to 


iv 


ArrayS «6 « e « « « 


Structure Primitive Functions 


Mixed Primitive Functions 
Set Primitive Functions . 


Identities for Scalar Dyadic 


Functions « « 6 »« «© « * 
Compound Operators .. « 
Format Functions oe ee @ 


General .« « « «© «© © © © © « « 
System Variables ... « e« « 
Function Transformations .. 
Name Functions ..« « »« »« « e 
Debugging AidS . «.« «6 « « « e« 
Execution Controls © © « «© e 
Special Character Sets .. . 
Status Enquiries . .« «6 »« « « 
Il-Bar Primitive Functions . . 


4 FUNCTION DEFINITION, EDITING, AND EXECUTION 
Function Definition and Editing ... . 

Defined Function Execution .... « « 

Execution Control .« « « « e« «© © «© «© « e@ 

5 SYSTEM COMMANDS . .« « « « © © © «© «© © © © «@ 
General « « « « «© © © © © © © © «© © «@ « 

system Command Format .« .« « « « « e« e« -« 

System Command Categories .« « « «6 « « « 

Terminal Controls .« »« « « « «© « « e 

Clear Workspace Controls «.« « « « e 

Session Controls .« « « « « « »# « « 

Library Controls .« « « « « «© « « « 

Name Displays « « »« +» « « « « « « e 

Erase Names »« « « « «© © « «© e © «# e 

Run State .« « « « «© « «© © © #« © «© «@ 

Group Commands a co ee ee ee ee ee 

6 SYSTEM VARIABLES AND SYSTEM FUNCTIONS .. . 


am 1 


i 
FrRPODOOAUWNEFPREERPEF ULE 


he O 


i i 
rFrFWO ONnNU ENF 


ee O 


ON OV ON ON ON ON ON ON ON OD oy a ee FL 


Table of Contents (cont ) 


Section Title 
i FILE SYSTEM OPERATORS .« « « « « «© © © © @ e@ 
General . « « « © « «© © «© © © «© © #© « e 
File Name .« .« « « «© « «© © «e © e « » 
File ComponentS . « « « © « © « e e 
File Limits .«. « « « e © «© #© « «© « e 
File Opening, Active/Inactive Status 
Notes « « ee «© «© © «© «© © «© © e e « e@ 
File System Primitive Operators « « » . 
File Create, Change Password, Re- 
name and Destroy ...e « « e « e 
File Component Null, Write and Read 
File Component Pop and Append... 
File Component Reverse and Rotate . 
File Component Take and Drop .. . 
File Component Compress and Expand 
File Existence and Query .... .e 
File Component Map .... « « « « 
File Hold, Free, Preempt .... . 
File System Interrogate . .« « « « e 
8 ERROR REPORTS AND INTERPRETATION 4... 
General .« « « « «© « © «© © © «© © © # e@ « 
Error Report Formats ..«...« e« e « e 
Types and Forms of Errors .... « « e 
Syntax Error -«. ~@ s. > © we wi. wh ce Se 
Definition Error .... « « « « e 
Domain Error . «+ « « e © e e « « 
Type Error ..«-.+« «+o « © «© © e @ e 
Value Error « « «© «© «© «© © © © # # » 
Rawk Error: @..6 “ <6. @. @: .«: @ Je «4% 
APPENDICES 
A Glossary of Terms, Abbreviations, and 
Acronyms .« « « « « © «© «© «© «© © «© © « « « 
B Summary of Transaction, Typing, and Attention 


Conventions 


~j 
i 
J 


~~ 
Pred 
MMM HEE 


1 I 
ee eo ON NU EW 


wr O 


G0 00 G0 G0 CO MO MMMM AWIIIAIIIIIY WI 
i 
PRrPEEWOWN EEE 


List of Illustrations 


Figure Title 
1-1 Transaction Cycle . .« « «6 « « «© © © « « 
2Q—1 APL/Terminal, Typical 44-Character/Key- 


board Configuration « « « « « « © « « 


2-2 APL Terminal, 47~Character/Keyboard 
Configuration eoeceo e ee ee e© 8 oe e @ e 


List of Tables 


Table Title 
2=1 Forming Overstrike Symbols ....« « -« 
2—2 Input/Output Communication Functions . 
3-1 Examples of Data Element Forms ... . 
ed Function Definition and Editing .... 
8-1 Error Reports . . « « e « «© © « « «© « e 


Page 


1-3 


2-3 


2-3 


Page 
a~5 
2-16 
ee) 
42 


8-5 


INTRODUCTION 


This publication is a user reference manual for the Burroughs APL/700 
System, which is a general-purpose system for processing information in 
a time-sharing, interactive environment. APL (A Programming Language) 
is a language for describing procedures in the processing of informa- 
tion and is very concise, consistent, and powerful. Because APL is 
similar in many respects to algebraic notation and contains many use- 
ful functions not expressible concisely with conventional symbols, it 
is very effective for describing algorithms (problem-solving proced- 
ures). The Burroughs APL/700 System incorporates all of the features 
of existing APL systems, but it has many additional features and en- 
hancements that make it more versatile and powerful. Some of the 
salient features and enhancements are; 


° Extended function capability 
° Improved interaction 

. Formatting capability 

: Extended function editing 

° Enhanced system control 

° Comprehensive error reporting 


The purpose of this manual is to provide sufficient reference data and 
instructions to assist users in the application and use of the Bur- 
roughs APL /700 System. The intent of the presentation is to enable 
the user to take best advantage of the APL/700 capabilities and to 
achieve maximum effectiveness in his application. 
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SECTION 1 


APL/700 SYSTEM DESCRIPTION 


GENERAL. 


APL/700 is an interactive tool for problem solvers. Its purpose is to 
provide a means for the person formulating the problem to get results 
quickly. The user works through a terminal. entry of problem 
formulation and data can be intermixed. Entered information and 
returned results are displayed for immediate review. This type of use 
1s appropriate for applications where user contribution to solution 
is important. Some characteristics of effective uses include value in 
timely solution, experimentation, asking what if questions. These 
contrast with traditional bulk data procesSing, where massive outputs 
are prepared in hope that somewhere therein can be extracted the 
answers to any potential questions. 


The problem formulation can often be in terms of an immediately 
executed APL expresSion for which direct response is provided. 
APL/700 has many powerful primitive functions built-in and available 
for this use. These apply consistently to simple or structured data. 
Uniform, parallel processing of all elements in a cata structure 
permits significant processes to be concisely expressed, with 
irrelevant detail suppressed. 


Entered data or the results of computations can be retained in 
variables. User defined functions can be used to capture formulated 
problem solutions. User defined functions are composed from 
constants, variables, the primitive functions, anc other user definec 
functions. Captured functions and data can be saved for subsequent 
use. A file system is available to extend the amount of data 
available for retention, retrieval and processing. 


APL is being successfully used for many applications including: 


Financial analysis and forcasting 
Statistical analysis 
Administrative reporting 
Mathematical analysis 

Text processing 

Mailbox message distribution 
Reservation control systems 
Computer aided instruction 
Graphing and data plotting 
Simulation 


The common property of these applications is their use of direct input 
and immediate display response, Traditional computation=-bound 
applications are not candidates for APL, at least in that form. Often 
recasting these traditional jobs into APL provides a more satisfactory 
solution for the user with the problem. 


PROPERTIES AND FEATURES. 


APL/700 may be characterized as: 


accessible immediate response for "trivial" requests 
inobtrusive problems quickly solved at user's pace 
concise powerful primitives on data structures 
Simple consistent, few rules 

readable define functions in few lines 

forgiving easy error correction, good recovery 
secure protection for private or shared work 


habit forming accomplishments eagerly shared among users 
Features that make APL/700 an effective interactive system include: 

built-in APL functions for processing data 

immediate expression execution in calculator mode 

progresSive expression development by augmenting prior entry 

data entry in calculator or input modes 

user function creation in function definition and editing mode 

file operators for accessing extensive data 

formatting functions for report preparation 

system functions and commands to query and alter environment 


keyboard input and display controls 
USE REQUIREMENTS. 


The requirements to use APL are simple: 
a terminal with APL characters 
an account on an APL/700 system 


The above are presumed available. Note that typing skill is not on 
the above list. APL is so concise that typing is not a significant 
barrier for most problem statements. Since the reader is encouraged 
to learn APL on a terminal, keyboard familiarity develops with use. 


The user quickly learn to experiment: When in doubt, try it? 
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APL/700 INTERACTIVE ENVIRONMENT, 


The user of APL/700 apparently receives access to a central processor 
always ready for his exclusive use. This is achieved for many users 
concurrently, since the amount of computer resources required for 
servicing any one user is uSually a small fraction of that available. 


A transaction is the alternating cycle starting with a user phase 
followed by a processor phase. The user phase starts with the 
terminal ready for user typing, continues through user typing an entry 
requiring service and completes with typing return (RETN). The 
processor phase starts by receiving the RETN, continues with servicing 
the request, possibly generating output, and finally restoring the 
terminal ready for next user entry. 


Request 
RETN 


APL/700 


Terminal Processor 


Response 
Unlock Keyboard 
User Processor 


Types Entry RETN Process (Output) 


Keyboard Unlocked Locked 


Typical Time 1 to 30 0 to 1 O to 6 
Span, Seconds 


FIGURE 1-1. TRANSACTION CYCLE 


So long as the time in the user phase or receiving output is 
essentially all the transaction cycle, the user is satisfied that he 
has the entire processor. It is always waiting for him, and he works 
at his own pace. APL/700 achieves this by scheduling "short" requests 
(taking no more than a fraction of a second of processing to complete) 
for almost immediate service. "Involved" requests (that a user might 
expect to take awhile) are scheduled for processing that can be 
interrupted as necessary to service short requests from other users. 


The benefits from sharing the APL processor among many users 
concurrently include: 


Immediate response for short transactions, 

Work smoothing among many irregular demands for service, 
Powerful processor available when needed, 

Cost spread across users as resources are used, 

"Think time" need not be penalized, 

Data files for data accumulation and shared access. 
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DATA ELEMENTS AND OBJECTS. 


Data objects are the units for processing. A data object has the 
properties of type, shape, and value. 


The type of a data object is one of the following: 


character any APL characters 
numeric any value representable as a number 


The numeric data type is further restricted to integer, having integer 
values only; and Boolean, having values 0 or 1 only. 


A data object may be- a scalar, in which it has a single element 
without shape (a geometric point). A data object may be an array, in 
which case it has a number of dimensions, with a length or number of 
elements along each dimension. If there is only one dimension, the 
array 1S referred to as a vector. The shape of a data object is the 
vector indicating the lengths along the dimensions. The right most 
element of the shape vector is the number of columns. A two 
dimensional array is referred to as a matrix. The shape of a matrix 
is the number of rows, then the number of columns. Any dimension may 
have length 0 or 1. The result of processing such objects requires 
special attention. The rank of an object is the number of dimensions. 


The size of an object is the number of elements it contains. The size 
is empty if the length of any dimension is zero. The size of a scalar 
is one, as is the size of a one element array of any rank. A 
character string is a scalar or vector of character type. 


The value of a data object is the array of values of the individual 
elements. 


Any array data object may be characterized as: 


rank n n dimensions 

rectangular all planes across a dimension have the same shape 
homogeneous all elements are the same type 

dense all elements are present, and represented the 


same way 
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The geometric view of an array is often useful. A plane is a slice of 
a shaped object that is orthogonal to a given dimension of that 
object. A plane across the k-th dimension of an n-dimensional object 
is a (n-1)-dimensional object with all but the k-th dimension of the 
original retained. Thus a plane of a vector is a scalar element, and 
a plane of a matrix is a row or column. A vector along a dimension is 
parallel to that dimension's axis. A plane across a dimension is 
orthogonal (at ‘right angles') to that dimension. 


A face of an array is the first or the last plane across’ any 

e NE e e ® Ld 
dimension. A corner of an array is any n-dimensional sub-array having 
n of its faces that are sub-faces of an n-dimensional array. 


Each element in an array can be referenced by its coordinates, an 
e e ry e e RS 
ordered list of scalar indices, one for each dimension from first to 


last. An index refers to the ordinal position along a dimension of 
a plane across that dimension. The index position indicates the 
position of a plane relative to a dimension an array. Index 


position j of a plane selects the j-th plane ie a given dimension. 
The index domain for a coordinate is the set of integers starting from 
the origin and including one member for each plane across’ that 
dimension. For any dimension of an array, any numeric data object can 
be used that contains only integers in the index domain for that 
dimension. A semicolon separates index objects referring to 
successive dimensions. Any dimension without explicit index objects 
is equivalent to all planes across that dimension. The index sequence 
is the conventional order of the sets of indices of the elements of an 
array, whereby the last dimension steps through its values most 
rapidly. (As [131] [132] [2:1] [2;2]). 
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USAGE MODES. 


The user of APL may select one of the following modes for use at any 
time. 


Calculator Mode. 
immediate execution of entered expressions 
progressive expression development 
assignment of values to variables 
calling defined functions 
prompt: indent five spaces 
Function Execution Mode. 
execution of user defined functions 
prompt: keyboard locked 
Data Entry Mode. 
numeric, in response to default prompt ([): 
character, in response to optional user generated prompt 
Function Definition and Fditing Mode. 
development of user defined functions 
convenient line editing 
establishment of automatic debugging aids 


prompt: [n] at left marcin for line n of open function 
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COMPONENTS OF APL LANGUAGE. 
The APL user makes use of the following kinds of components: 


constants and variables 
primitive functions 
user defined functions 
control structures 


CONSTANTS AND VARIABLES. 


A constant is a data object without a name. ConstantS can appear as 
part of user defined functions or entered as part of calculator mode 
expressions. 


A variable has a name that gains its meaning from asSignment of a data 
structure. The variable name is used in APL expressions as reference 
for the associated data structure. Fach subsequent assignment to the 
same name changes the data structure associated with it. 


Constants and variables can he used as arguments to functions in APL 
expressions. 


FUNCTIONS. 


Functions perform processing following particular defined rules. Many 
primitive functions of general utility are built-in to APL. Other 
functions can be created by the user for his problem solving. These 
are called defined functions. They make use of primitive functions 
or other defined functions. 


A function accepts arguments and generally returns a value, resulting 
from following the processing rule for that function as applied to the 
argument values. 
A function is defined for a domain of values for each of its arguments 
and produces a result in the range of values. For example the 
relational function "less than", as used in 

A "less than" B 


has numeric domain for arguments A and B and the values true and 
false as the range of values for the result. 


In APL, “less than" is expressed by the symbol '<', and the values 
true and false by the Booleans 1 and 0 respectively. 
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Primitive Functions and Operators. 


Complete families of primitive functions are provided for numeric type 
data objects: 


arithmetic 
relations 
logical 

higher functions 
random numbers 


Additional function families exist that apply to both numeric or 
character data types: 


structure building and changing 
mixed type 

sets 

indexing 

assignment 

formatting 


A group of operators exist which use primitive functions as compcnents 
that operate with data objects. 


A file system provides convenient access to extensive data uSing a set 


of file operators. 


A set of system functions permit querying and altering the 
environment within which APL is used. 


A similar set of system commands can be used only in calculator mode. 


User Defined Functions. 


User defined functions may be created by combining built-in primitive 
functions, operators, constants, variables, other defined functions, 
punctuation, and control structures to perform more complex processing 
than can be done by Single primitive functions. 


A user defined function can have arguments. Arguments provide values 
for use during execution. 


hX user defined function may return a result from execution. If so, 
the user definec function can be used Similarly to primitive functions 
to compose expressions. 


CONTROL STRUCTURES. 


The APL control structures control order of execution. Primitive 
functions apply “in parallel" to all elements of the’ structures. 
Functions are elaborated right to left within expressions. Lines are 
normally executed in sequence within user defined functions. Non- 
sequential execution is achieved by explicit transfer to a line number 
(which may be computed). A user-defined functions may be called, in 
which case control is passed to the called function. Subsequently 


control is returned to the caller after the point of call. The 
completed function mav return a value. Functions may be called 
recursively. 


There are no formal conditional or iterative control structures for 
user defined functions. These are generally subsumed within 
processing on data structures. When required, the conditional and 
iterative control structures are synthesized by explicit control 
transfers. 


1-9 


WORKSPACES, LIBRARY AND FILES. 


Each user account has an active workspace. The active workspace is 
the fixed size area of storage in which a user conducts his 
transactions. At first sign-on this workspace is unnamed and clear. 
After some transactions, there may be some variables having values and 
some user defined functions having continuing use. 


A user can name the active workspace and save a copy of it in his 
library. Library workspaces are inactive, in that they are not 
currently being worked upon. A library workspace can be reactivated. 
The number of workspaces in the user library is limited to the auota 
established by the installation for that account. All workspaces have 
the same size, determined by the installation. 


Within a workspace are all retained variables, defined functions, and 
temporary storage required during processing. The conciseness’ of 
APL/700 defined functions permits a surprisinaoly large processing 
capability in a workspace. 


Each account may also have a quota of files. Each file has a name and 
a set of numbered components. Each component is either null (havine 
no content) or contains an APL/700 data object. Data objects can 
readily be exchanged with the active workspace. This increases the 
amount of data that can be processed by functions in a workspace. 


SELF PROTECTION. 


The active workspace contains current work. Whenever desired, a copv 
of that workspace can be saved for subsequent resumption at the point 
of saving. 


Function definition chances or experimental computation can be done, 
then either kept if good, or discarded by returning to the formerly 
saved version. 


The active workspace is retained in the event of unexpected 
disconnection caused by either the terminal, the communications link, 
or the main system. Upon next sSion-on for the account, recovery 
occurs automatically to within the last (incompletely) entered 
transaction if in entry phase; or to the last line processed if in 
processor phase. 


The commands having irrecoverable effects tend to be separated and 
protected against accidental misuse. For example, the user can FRASE 
names of variables, functions or groups; but must DROP a workspace. 


SECURITY AND SHARING. 


Protecting an account, its workspaces and files from other users is 
often important to aéeuser. Locks and passwords provide these 
capabilities. Selective sharing of workspaces and files among 
accounts is often desirable. A user can grant access privileges to 


those he wishes, and deny privileges to all others. 


A function can be locked so that it cannot be opened for examination 
by any workspace other than where it was locked. 


A user account name iS unique, assigned by the installation. It is 
not considered private, but only a means for identifying the account 
when Signed on the system, and for other users to reference the 
inactive workspaces and files retained for it. 


The account user can add a distinct password to any account, workspace 


or file name. Password use can provide a degree of security to the 
name there locked, since the assigner of that password controls its 
dissemination. The password is not publicly known within the 
installation. A password can be changed at any time. Passwords and 
changes thereto are entered through the terminal. If hard copy is 
printed, a blot can be used to obscure by overprinting the area in 
which the password appears. Of course, no security is provided 


against tapping the communications line connecting the terminal with 
the APL system unless special communications security means are taken. 


A user cannot alter the original of a workspace in another account; he 
can only obtain a copy of it in his active workspace, assuming the 
account owner has told him the account name and workspace name (and 
password if any). 


A user can alter any file in the APL file system, if he knows the 
owning account/file name (and password if any). Thus to control the 
allowable file alteration in shared file applications, the owner 
should provide a file access function through which all accesses are 
made. In this function, the file password can be secured from 
disclosure and necessary access conditions can be checked. This 
function can itself be locked, denying the user the ability to examine 
its content. Thus, the file name and password need never appear in 
visible form to the user. 


A file can be shared among several users. The capability to update a 


file component safely is provided through reserving the file for 
exclusive use during the update operation. 
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SECTION 2 
INTERACTING WITH APL/700 


GENERAL. 


The APL/700 environment consists of a very distinctive conversational 
interface, where the user intimately interacts with the system in per- 
forming transactions or generating, executing, and debugging a program. 
During the process of execution, the user may at any time stop the pro- 
cessing and have available all of the local variables and other envir- 
onmental factors for examination and modification. Because the user 
is able to follow the processing in such detail, he has a very effec- 
tive debugging tool. The APL/700 user environment consists of an 
available library, workspace properties (such as print width, print 
precision, index, origin, and workspace name ) , accounting information, 
and other parameters. The user has control of these factors and may 
query them. By virtue of the system interactivity, the user has a 
large number of tools by which he may edit his transaction upon entry 
or upon reentry. The order in which an entry is typed is not relevant, 
but the final image of that entry is the logical entry that is sent to 
the system. 


APL/700 is heavily oriented to problem solving; thus, a user can rap- 
idly and efficiently form programs and interact with them. Because of 
the simple syntax of APL/700, users other than programmers may success- 
fully use it. The reliability engineer, for example, who knows his 
application well but knows little about programming, need not communi- 
cate his application to another person, who then performs the program- 
ming chore. He can directly approach the computer by means of a 
terminal using the APL/700 language. APL/700 reduces the problem 
solution turn-around time considerably. In addition to mathematical 
computations, APL can also be used for modeling of complex systems or 
for simulation, text editing, algorithm development, probability pre- 
dictions, and forecasting. Moreover, APL/700 provides a vehicle for 
the development of application packages, such as circuit analysis pro- 
grams and linear programming techniques. 


ACCESSING THE SYSTEM. 


The user interface with APL/700 is through a communications terminal 
with the special APL typeface and keyboard configuration and with 
provisions for direct or acoustic-coupling teleprocessing communica- 
tions with the system Data Communications Processor. The APL/700 
System is compatible with all standard hard-copy and video APL-type 
terminals. 


This section describes the configuration and operation features of the 
typical APL-type terminal. Application reference data and detailed 
procedures are given for some of the general operations required, such 
as sign-on, sign-off, and editing procedures. The instructions pre- 
sented in this section and throughout the manual assume the use of the 
typical APL terminal configuration (as described herein) and an acous- 
tically coupled telephone interface with the Data Communications Pro- 
cessor. 


APL TERMINAL KEYBOARD CONFIGURATIONS. 


Figure 2-1 shows the configuration of the most commonly available APL 
terminal keyboard, which has 44 character/symbol keys, 9 functional 
keys/bars, and a power on-off switch. Recently produced APL terminals 
contain 47 character/symbol keys as shown in Figure 2-2. 


APL CHARACTER/SYMBOL SET. The APL character/symbol set consists of 
the 26 uppercase alphabetic characters, numerals O thru 9, standard 
punctuation/mathematical symbols, and a number of special APL function 
symbols not used on standard typewriters. Also note that the conven- 
tional symbols are not in the standard typewriter keyboard locations. 


NOTE 


The following APL character=-set are 
described for typical (standard) 
APL terminals. Character formats 
for other terminals vary somewhat 
in form. For example, all charac- 
ters on some units are upright and 
not condensed. 


Alphabetic characters are in the uppercase, italic, and condensed 
(higher than wide) form as follows: 


ABCDEFGHI<dKLMNOPOQRSTUVWX Y 2 
A full set of underscored alphabetic characters may also be used. 


Numerals are in the upright and condensed form as follows: 


1234567890 


Function symbols are in the normal, not-condensed, and upright form 
(except for Greek letters) as follows: 


< $s = 22> #VA- FP wepnp~ tt + 1 O* + 


aofFbLOVActOAC )caanuLtLTts!s:v/s 


MAR > 
AES 
fe oles elles le " 
WIE T | Yj}U I Pi\l<€ 
RETURN 
| LOCK a [ L ~| VIA . OQ 
A |S | D F\|GItA\tdo | Ki oD 
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Figure 2-1. APL Terminal, Typical 4y-Character/Symbol Keyboard Con= 
figuration 
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Figure 2-2. APL Terminal, 4'7-Character/Symbol Keyboard Configuration 


Additional operator characters and symbols are formed for use by APL/ 
700 by overstriking the characters and symbols as follows 


ITFAn*MA KL OGRSeEH AY HR A 


"ROMAMEB<KREB EHR AME ENG 
NOTE 


The order in which characters are 
overstruck is not important. Over- 
strike "$" is not necessary on those 
47-key configurations having the 
dollar ($#) sign. 


Table 2-1 shows how the special overstrike characters and symbols are 
formed. 


FUNCTIONAL KEYS/BARS. The APL terminal keyboard has special keys and 
bars for the tab, shift, space, carriage-return, backspace, attention, 
margin-release, and clear=-set functions. Some terminals also have in- 
dex or line-feed keys. In addition to the power on-off switch, some 
terminals may be equipped with a communicate-local function switch. 
The "communicate" position of this switch must be used when operating 
in the APL/700 system. 


BASIC IMPLEMENTATION OPERATIONS. 

The basic operations required to implement the APL/700 involve sign- 
on, transaction, and sign-off procedures. Recovery and editing pro- 
cedures are also performed on an as-required basis. 

TYPING RULES/CONVENTIONS. 

Except for different character/symbol key locations and certain special 


functions and rules, typing at the APL keyboard is done in the conven- 
tional manner. The following rules/conventions apply: 


Function Rule/Convention 


User/System A user can type only when the keyboard is un- 
Typing locked, whereas the APL/700 system locks when 
processing user inputs or displaying respon- 
SeCSe 


Operator typing is distinguished from system 
typing (on hard or video copy) by indenta- 
tion in most transactions. (User copy is 
automatically indented five spaces, by system 
"prompt", while system copy normally starts 
at the left margin. ) 
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Table 2-1 


Forming Overstrike Symbols 


Overstrike Formed By | Overstrike Formed By 
haracter Overstriking Character Overstriking 


8 S iB a 
? - "A 0 
x - N q 
=) = 6 9 
Q \ By 0 
® x a ; 
> | BI O 
A | R 0 
Y | M [ 
A = W 0 
# ~ is 9 
~ ~ 7 
™ ~ 0 
A ° a q 
$ ° A q 
° i U 
I 1 Bi U 
: ° q q 


Function 


Return 


Entry Length 


Shift (upper-lower 
characters/symbols) 


Spacing 


Backspacing 


Tabs 


Line Feed 


Attention/Interrupt 
(or Break) 


Text Comment (Lamp) 
Symbol ( @ 
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Rule/Convention 


Pressing the return (RTN or RETURN) key sig- 
nals the system that a user entry is complete 
and ready for processing. (The carrier is 
returned to the left margin and the keyboard 
is locked. ) 


Each user entry should fit on a single type 
line. 


Pressing any character/symbol key normally 
inserts the lower character/symbol on that 
key into text at position of cursor. Simul- 
taneous pressing of SHIFT key inserts the 
upper symbol on key. (A shift lock can also 
be used.) 


Momentarily pressing the space bar positions 
the cursor one space to right; holding space 
bar on some terminals causes repetitive spac- 
ing. 


NOTE 


Extra spaces will not usu- 
ally affect transaction 
processing. 


Pressing backspace (BACK SPACE) key positions 
cursor one space to left. On some terminals, 
repetitive backspacing is accomplished by 
pressing and holding backspace key. 


Pressing tab key positions cursor rightward to 
next tab stop (if set). in application, the 
tabs should be set to constant intervals (such 
as five characters). 


Pressing line-feed key discards text above 
and to right of current position of cursor. 


The attention (ATTN) key provides for initia- 
tion of special processing. It's uses in- 
clude: (1) correction of immediate entry error 


restating and adjusting of prior entry, and (2) 


execution suspension or abortion. 


If it is desired to enter notations or com- 
ments without system response (niladic), pre- 
fix the comment text with the lamp symbol. 


Function Rule/Convention 


Overstrikes Overstriking characters to form special sym- 
bol operators may be performed in accordance 
with Table 2-1. (Either character is typed 
first, the carrier is backspaced once, and 
then the other character is typed.) Over- 
striking with an "X" or other character for 
character/text deletions is not allowed. 


Visual Fidelity It is not necessary to type complete line 
text or characters in order; entries are in- 
terpreted by the system only after the return 
function is completed. That is, the time se- 
quence in which the operator presses the 
various keys doesn!t matter; the system in- 
terprets the entry as it is viewed on the 
paper or display. 


Local /Communicate The terminal must be in the remote, communi- 
Mode cate mode to use the APL/700 system. The 
local mode may be used for off-line typing. 
(Switching between local and communicate modes 
may generate an extra transmitted character, 
often a "9",) 


Other convenience keys, not always available on all terminals are as 
follows: 


Linefeed Acts like attention key, but does not provide 
a prompt for in-line editing. 


Repeat Provides repeated, automatic typing of any 
other character/symbol. 


SIGN-ON PROCEDURE. 


Perform the following procedure to activate the APL terminal and sign 
on to the APL/700 system: 


NOTE 


The following procedure assumes 
the use of an acoustic coupler- 
telephone communications inter- 
face. Minor variations to the 
procedure may be required for the 
various terminals. 


1. Turn on terminal and acoustic coupler power. 
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Lift handset from telephone cradle, dial allocated computer 
telephone number, and listen for high-pitched tone. 


When tone is received from computer, place handset in acous- 
tic coupler cradle. (Position handset so that cord end is in 
coupler receiver marked CORD. ) 

Wait for sign-on response from computer; press return, atten- 
tion, or break key if necessary. <A typical response is as 
follows: 


OH-LINE TO APL/7003; YOU ARE: 113163 (LSN:6). 


Where: N3163 and (LSN: 6) are variable telephone number 
and Logical Station Number, respectively. 


If necessary, repeat pressing ATTN key until response is 
received. 


When above response is received, type following entry: 
\APL 


Wait for system "prompt" (cursor types five-space indenta- 
tion); then type following system command entry: 


)ON Acct | Password | 
Wheres Acct is user account identification. 


Password is optional entry for a previously 
locked account; omit entry if account is unlocked. 


Example: )ON RJS | BIGBE] 


Press return (RTN) key and wait for system sign-on response, 
which has the following typical formats: 


FRIDAY 74/02/01 11.51 AM [V25041 7120 TOO S006] 


Where: V25041 is the release version of APL /700 being 
used. 


W120 is the terminal width (numbers of characters 
per line ) assumed for the user account. 


TOO is the terminal tab interval assumed for the 
account. 


SOO6 is the number of the port to which terminal 
is connected (used for communications purposes). 


8. Wait for system prompt (five-space indention). 


When a system prompt is received, the sign-on procedure is completed, 
the keyboard is unlocked, and the system is ready to process a user 
transaction entry. (The system provides the user with a block of its 
internal storage facilities called an active workspace. ) 


TRANSACTION PROCEDURE. 


When the system sign-on process is completed, the user may perform a 
series of transactions (cycles consisting of user entry and system 
response ) as follows: 


1. Make certain that APL system has initiated cycle by typing a 


prompt (usually a five-space indention) and unlocking key- 
board. 


2e Using character/symbol keys and shift bar(s), type in de- 
sired entry. For example, if it is desired to set a work- 
space name, type the following: 


)WSID Name 
Where: Name is desired workspace identifier. 
Example: )WSID WKSPO1 


3. When transaction entry is typed, press return (RETURN) key to 
signal system and initiate processing. 


4, Wait for system to complete transaction (indicated by return- 
ing a typed response at left margin). Response can be a 
statement, transaction result, or error message. 


NOTE 


If an error message is received, 
perform the appropriate action/ 
correction and reenter the de- 

sired transaction specification. 
(Refer to Section 8 for error- 
message descriptions and to the 
paragraphs describing editing and 
recovery procedures in this section. ) 


When the transaction is completed with a valid system response (print- 
out or display), a five-space prompt is returned and the keyboard is 
unlocked to enable the next transaction entry. Repeat steps 2 through 
4 for each subsequent transaction. 
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SIGN=-OFF PROCEDURE. 


When all user transactions are completed, or it is necessary to tem- 
porarily interrupt operations at the terminal, perform the following 
procedure to sign off from the system: 


1. Make certain that a prompt (five-space indention) has been 
been typed and the keyboard is unlocked. 


2e Type one of the following sign-off commands: 


or 
)corFF [ 0idlock/Newlock| 


Where: )OFF is system sign-off command. (Work sesssion 
is terminated and active workspace is discarded. ) 
If it is desired to save active workspace for 
continued use during the next session, enter 
")COFF". [Oldlock/Newlock]| is optional entry 


specifying account locks (passwords), if used. 
NOTE 


Oldlock is lock (password) 
presently used on account. 
Newlock is new lock assigned 
during sign-on process. lf 
it is not desired to change 
lock, or there is no lock on 
account, omit entire Oldlock/ 
Newlock entry. Leave Newlock 
entry blank to remove lock 
from account. 


Example: )COFF [ BIGBE/PAOLT] 


3. Press return key and wait for the following system sign-off 
statement (typical): 


)OFF 
THURSDAY 74/01/17 02.42 PM 
CONNECTED 00.55.48 LO DATE 02.06.20 
CPU TIME 00.00.02 LO DATE 00.00.09 
IN APL-MCS 


Where: This response reflects the type, time and date 
of sign-off; the four other numerical responses 
reflect time (hours, minutes, and seconds) spent 
on current session, plus total time to date for 
both connection and CPU usage. IN APL=MCS is 
version of message control system. 


4. Remove telephone handset from acoustic coupler and return 
handset to telephone cradle. 


5« Turn off terminal and coupler power as required. 


RECOVERY OPERATIONS. 


The APL/700 system provides automatic recovery from temporary work- 
session interruptions, accidental disconnections, or system malfunc- 
tions. When a user signs off from the system for a temporary work- 
session interruption (by using the ")COFF" command) the active work- 
space is returned when the next session is signed on. 


When the active workspace is saved from a session and the account is 
signed on by using the previously described sign-on procedure, the 
system responds with the normal sign-on display with an additional 
statement as follows: 


WS Name CONTINUED FROM Time Date 
Wheres Name is identifier of saved workspace. 


Time and Date indicate time and date that pre- 
vious work session was suspended. 


Examples: 


JON RIS 
WEDNESDAY 74/01/30 11.18 AM [V25041 W130 705 $018] 
CONTINUED FROM 74/01/30 11.02.33 


It is possible that an accidental disconnection or system malfunction 
will occur during any work session. In either case, the system will 
automatically save the active workspace and provide a "CONTINUED" mes- 
sage when the account is again signed on. 


If the execution of a program was interrupted, then the word "EXECU- 
TION" will appear between the active workspace name and "CONTINUED". 
The program execution will continue until the line being executed is 
completed; then the function name and line number are printed, followed 
by an asterisk or star (*) symbol to indicate that the function is sus- 
pended. The system then types an input prompt (five spaces) and waits 
for a transaction entry. 


If a function was being defined when a work session is interrupted, 
the word "DEFINITION" will appear between the workspace name and the 
word "CONTINUED" in the message. A function definition prompt is then 
returned to enable continuation of the function definition. An acci- 
dental interruption that occurs while an entry is being composed re- 
sults in the loss of that entry attempt. 


TRANSACTION EDITING. 


There are a number of variations in performing transaction editing in 

the APL/700 system. The procedures required for editing depend on the 
mode of operation, on the state of the keyboard (locked or unlocked), 

on whether an "attention" entry is initial or non-initial, and on the 

type of editing required. 


CORRECTING IN-PROCESS TYPING ERRORS. If a typing error is noticed be- 
fore the transaction text entry is completed and the return (RETURN) 
key is pressed, the error is corrected as follows: 


1. Using BACKSPACE and space keys, position cursor at the left- 
most character that is in error. 


2. Press attention (ATTN or BREAK) key and observe that system 
types inverted caret ( y ) under character backspaced to in 
previous step and then feeds paper up one line. (This action 
effectively erases the errored character and every character 
to the right. ) The INDEX key (when supplied on some termin- 
als) can be used for this attention application; however the 
inverted caret is not viewed. 


3. When system response is completed, resume typing correct en- 
try and the remainder of transaction entry. 


Example: Suppose that the system command " YON ACCT1 
| KEYLOAD]" is typed, where "KEYLOAD" was in- 
tended to be "KEYLOCK", The resultant system 
response and correction is as follows: 


JON ACCT1 [| KEYLOAD | 


Vy, 
CK | 


The corrected entry ")ON ACCT1 | KEYLOCK |" is 
now entered by the carriage-return function. 


TRANSACTION EDITING PROCEDURE. APL/700 has provisions for retrieving 
the most recently entered transaction and modifying it. This may be 
desired as part of a normal evolution of a computational expression, 
or in response to an error message or wrong result. The procedure 
for applying transaction editing is as follows: 


1. Make certain that cursor is at five-space indention position, 
then press attention key. 


2e Observe that previously entered transaction is displayed and 
that carrier returns to left margin. 


3. Type edit symbols below corresponding displayed characters 
as follows (space cursor accordingly): 


"/" The foreslash causes deletion of character above it. 


"." Each period segments display into another phrase, 
starting with the character above the period. (The 
first phrase starts at the left of the line.) 


4, Terminate edit line by pressing attention (not return). 


5. Observe that first phrase is displayed (up to the first per- 
iod of the edit line, or the entire remaining phrase if no 
period is used). 


6. Alter or augment displayed phrase by normal typing. 


Te Enter another attention at the right-most position to display 
the next phrase. 


8. Repeat steps 6 and 7 until entry is complete. A transaction 
entry is completed by either entering a return (or an atten- 
tion when no more phrases exist). 


Editing a line of a defined function involves the use of 
steps 3 through 8 of the above procedure. 


Any transaction-entered character not recognized by APL/700 results 
in a "CHARACTER ERROR" report. An example of this and subsequent 
editing is as follows: 


'THIS XB A BRD LINWE.' 
x*kk CHARACTER ERROR xxx 
'THIS 00 A BOD LINE.! 


//. Ss 
"THIS IS A LINE,' 
Vv 


PIXED LINE." 
PHIS IS A FIXED LINE, 


All invalid characters are replaced by the squat quad ( 0 ) symbol, 
and the cursor returns to the left margin. Editing can now be per- 
formed by starting at step 3 of the transaction editing procedure. 
If the attention key is pressed initially, a "twitch" prompt (three 
spaces and three backspaces) is returned. 


If the return key is pressed during the above procedures, the entry 

is completed whether or not the immediate-edit procedure was completed. 
If the return key is pressed too soon, an appropriate error message 

is returned. 
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Entering any character other than a space, slash, or period below a 
line re-displayed for editing results in the following error message: 


X¥*¥XEDIT ERROR*** 


Pressing the attention key permits the reinitiation of the transaction 
editing sequence. 


The use of the attention key for in-process typing corrections does 
not conflict with the applications described above. That is, for in- 
process typing, the cursor is not at the rightmost entry position when 
the attention key is pressed. 


EXAMPLES OF ATTENTION KEY APPLICATIONS. The following examples sum- 
marize the use of the attention key in transaction editing procedures. 
In the presentation, the left column indicates user entries, system 
responses, and the use of the attention, return, space, backspace, and 
edit functions. The right column contains annotations reflecting the 
various user and system actions. 


NOTE 
In the following examples: 
) indicates the return function. 
@ indicates the attention function. 


user spacing. 
user backspacing. 


indicates 
indicates 


Comments 


Example 


HIS IS A FIXED LINE. 


'THIS XB A BAD LINE." Q) 


xk*k CHARACTER FRROR xxx 


'THIS 0 A BOD LINE.! 


die LdIFT 


"LHis 2S. A LINE? 


@ 


<< 


V 
FIXED LING. 


' ® 


User transaction entry. 


System response to invalid overstrikes 
not recognized as APL characters. 


User-entered attention to extend cur- 
sor to left margin. 


User spaces to edit "IS", enters 
attention to accept remaining phrase 
(editing by "////"), backspaces to be- 
sinning of "LINE", enters another 
attention, retypes new phrase, and 
then enters a return to display the 
complete edited line. 


Example Comments 


@ User enters attention for immediate 
editing of previous transaction entry. 


"THIS IS A FIXED LINE.' System responds with display. 


Sse F (R) User spaces to "F", types an edit 
period, and then enters a return. 


'THIS IS A (R) System responds with first phrase, but 
wee SYNTAX HRROR **x user erroneously forgot remaining 
Vv phrase and entered a return. 
MTL 2. A 
@ @ Two attentions positions cursor at 
REPAIR,! end of phrase, and remaining phrase is 
ane entered with a return to complete the 
'THIS IS A REPAIR.' editing procedure. 


INPUT/OUTPUT COMMUNICATION FUNCTIONS. 


APL/700 provides implicit input and output forms. Thus, user-typed 
entries are accepted as inputs; results not explicitly assigned to a 
variable are returned by the system as outputs to the user display. 


The system also has specialized forms of input and output primitive 
functions related to communications between the system and the termi- 
nal. For example, there are times within a user defined procedure 
(function) where a value input from the user is required for evalua- 
tion to continue the operation/calculation. In this case, the evalu- 
ated-input function is embedded ,where needed in the defined function 
and results in an evaluated-input prompt to the user when that point 
is reached during execution. 


Table 2-2 lists the format and definition of the various input/output 
communication functions. The quad ( U ) and quad-prime ( @ ) symbols 
are used, along with value-producing expressions in these applications. 
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om ae oD =m CF GE GP a a a am am am an am 


MIXED OUTPUT 


oe ww ow we we ew oe mw om we = 


OUTPUT 
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TABLE 2-2 


INPUT/OUTPUT COMMUNICATION FUNCTIONS 


=e oe oe ee a oe ae oe we ee om oe oe 
oo ee em en ee ee Ow ae ae a oe a oo 


E1;E2;E33... 
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THE EXPRESSIONS EI ARE SEPARATELY EVALUATED RIGHT TO LEFT 
THEN THE RESULTS ARE OUTPUT. IF ALL THE EXPRESSIONS 
RETURN VECTORS AND SCALARS THEY ARE OUTPUT ON THE SAME 
LINE WITH NO SPACES BETWEEN THE END OF THE OUTPUT OF 

ONE EXPRESSION AND THE BEGINNING OF THE OUTPUT OF THE 
NEXT. MATRICES AND TENSORS ARE OUTPUT ON SEPARATE LIWES. 
THE QUAD ('f]') IS A PSEUDO-VARIABLE. WHEN IT IS USED 
WHERE A VALUE IS NEEDED THE PROMPT '‘(): ' FOLLOWED BY 

A LINEFEED IS SENT. THE USER MAY THEN ENTER ANY VALUE 
PRODUCING EXPRESSION. THE EXPRESSION WILL BE EVALUATED 
AND THE VALUE PRODUCED WILL BE USED IN PLACE OF THE QUAD. 
AN ESCAPE MAY BE MADE FROM EVALUATED INPUT BY ENTERING AN 
ABORT, ‘+'. THIS HAS THE SAME EFFECT AS IF THE ABORT WERE 
EXECUTED IN THE FUNCTION AT THAT POINT. 

WHEN THE QUAD IS USED TO THE LEFT OF THE REPLACEMENT 

THE VALUE BEING ASSIGNED TO IT IS OUTPUT. AS USUAL 

WITH ASSIGNMENT IT MAY BE IMBEDDED AS PART OF A LARGER 
EXPRESSION. 
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QUAD-PRIME ('™') IS A VARIABLE SHARED WITH THE APL 
PROCESSOR, I.E. IT MAY BE LOCALIZED IN A DEFINED FUNCTION. 
WHEN QUAD-PRIME IS USED WHERE A VALUE IS REQUIRED THE USER 
DEFINED PROMPT IS OUTPUT AND THE KEYBOARD IS UNLOCKED. 

THE USER THEN ENTERS ANY STRING. THE QUAD-PRIME IS THEN 
REPLACED BY THE INPUT STRING PREFIXED WITH AS MANY BLANKS 
AS THERE ARE CHARACTERS IN THE PROMPT. AN ESCAPE MAY BE 
MADE FROM CHARACTER INPUT BY ENTERING © (0, BACKSPACE, U, 
SAME EFFECT AS ABORT FOR EVALUATED INPUT. 

WHEN THE QUAD-PRIME APPEARS TO THE LEFT OF THE ASSIGNMENT 
THE VALUE ASSIGNED TO QUAD-PRIME IS THE PROMPT USED FOR 
ALL FUTURE QUAD-PRIME INPUT REQUESTS UNTIL THE PROMPT 

IS CHANGED, THE DEFAULT PROMPT IS THE EMPTY STRING(''). 
ONLY CHARACTER STRINGS MAY BF ASSIGNED TO QUAD-PRIME. 

IF E IS A VALUE PRODUCING EXPRESSION AND THE LAST FUNCTION 
EXECUTED WAS NOT AN ASSIGNMENT PRIMITIVE TREN TRE VALUF 
PRODUCED BY THE EXPRESSION WILL BF OUTPUT. 


SECTION 3 
THE APL/700 LANGUAGE 


GENERAL. 


The language of APL/700 is composed of an exceedingly simple syntax, 
together with very powerful primitive functions that apply to data 
structures. Data structures in APL/700 may range from simple elements 
to arrays. The primitive functions address these data elements ina 
parallel fashion, so that iteration is unnecessary. APL/700 has a 
large number of functions which may transform values or structures, or 
both. Furthermore, the user may define his own set of functions that 
are syntactically equivalent to the primitive functions of the lan- 
guage and that operate on the data structures in the same manner as 
these primitive operators. APL/700 has a distinctive symbol set in- 
stead of reserved words. The rules for composing expressions from 
these symbols are also simple, thus the notation for APL/700 is very 
concise and non-ambiguous. In the APL/700 language, the allocation of 
memory to a variable is done at the moment of assignment interpretation 
so that no previous declaration as to size, shape, or type is required. 


LANGUAGE ELEMENTS. 


APL/700 is used by entering statements or expressions which employ 
primitive functions, primitive operators, or defined functions inter- 
mixed with data objects. Primitive functions and operators are sup- 
plied by the APL/700 system, whereas defined functions are created and 
supplied by the user through the use of the function-definition process. 
User-defined functions can be niladic, monadic, or dyadic (no arguments, 
one argument, or two arguments, respectively) functions which do or do 
not return explicit results. 


This section describes the primitive functions and operators and their 
applications. Section 4 provides a complete description of defined 
Functions and associated definition, editing, and diagnostic opera- 
tions. Elementary information concerning language data elements and 
order of expression execution is provided in the following paragraphs. 


DATA ELEMENTS. 


A data object or datum in APL/700 is defined in terms of its type, 
shape, rank, and value. The type of a datum is either numeric (Boolean, 
integer, or real), or character (any of the APL characters). 


The shape of a datum is a vector with elements indicating the size of 
(number of elements along) each dimension. 


The rank of a datum is a (one element) vector indicating the number of 
dimensions. Allowable ranks are 0, 1, 2, ..... (through) 15. Names 
used to refer to rank structures are as follows: 


Rank Name 
O Scalar 
1 Vector 
4 Matrix 
Any (1-15) Array 


Rank can be viewed in geometric terms: scalars as points, vectors as 
line segments, matrices as rectangles, rank-3 objects as rectangular 
solids, and so forth. 


The general datum is an array characterized as follows: 
a. Homogeneous (single type). 
b. N-dimensional (rank N). 


c. Rectangular. (All sub-arrays across a dimension have the 
same shape. ) 


d. Dense. (All elements have values, as contrasted with sparse 
in which some means is provided to indicate the coordinates 
of significant values. ) 


Table 3-1 shows examples of the various forms of data elements. 


Note that the display of negative numeric data uses the " " symbol 
to the upper left of the number. This symbol is distinct from the 
subtract or negation symbol (-) in primitive function applications. 
For examples: 


“2.5 O 3.2 “hyd 


Also note that an exponential or "scientific" representation is pro- 
vided to reflect the significant digits and the power of 10 multiple. 
For example: 


~387E3 is equivalent to 387000 
1.2E 3 is equivalent to 0.0012 


Functions can be applied to arrays, subarrays, or individual elements 
of an array. Indexing is used to specify operation on subarrays or 
elements thereof. For example, in the following structure, element 13 
has an index of L133]. 


11 Le 13 
21 22 23 


Index [ 32] with an "empty" prefix, is used to specify the entire di- 
mension of column 2 in the above example. That is, all rows of col- 
umn 2 in the above example. That is, all rows of column 2 are speci- 
fied to yield a vector result of "12 22". Refer to the Indices ref- 
erence sheet for additional information. 


ORDER OF EXECUTION. 


When primitive functions or user value-returning functions are combined 
with variables or constants to form a compound expression, it is im- 
portant to make their order of execution clear. Because APL has so 
many functions, an attempt to establish precedence in determining the 
order of execution would result in unwarranted complexity. Instead, 
the following three general rules apply: 


ae A function is evaluated only when the values of the quantities 
it requires for its evaluation (also referred to as arguments 
or parameters) are known. 


b. The order of evaluating value producing functions in a com- 
pound expression is right to left. 


ce Parenthesis are used in‘the conventional mathematical way to 
alter the order of execution. 


Thus, a monadic function is evaluated when the value of its (right) 
argument is determined. A dyadic function is evaluated when both of 
its arguments (left and right) are determined. Because an argument 
can itself be an expression or a defined function, the process of de- 
termining the value of the expression or function is referred to as 
elaboration. 


The order of argument elaboration for a dyadic function is generally 
unimportant; the order is usually right to left. An exception to this 
is where the right argument is a simple variable name. If elaboration 
of the left argument changes the value of the right argument, a sur- 
prising result occurs. 


ORDER OF EXECUTION EXAMPLES. In the following example formats, "V" 
represents a value, "m'' represents a monadic function, and "d" repre- 
sents a dyadic function. Each elaboration of a value-producing func- 
tion replaces the function and its argument(s) with a value. Each 
elaboration of an expression within parenthesis replaces it with a 
value. 


VdVdv Expression) 

Vd(vdav) Equivalent expression) 
a st Order of elaboration) 

Vdmv Expression) 

Vd(mv) Equivalent expression) 
21 Order of elaboration) 


(Vdav)dv a 


1 2 Order of elaboration) 
m(m(VdaV)dmv )dVdmv Expression) 
86 4 53721 Order of elaboration) 


Note that is is not necessary to enclose right arguments within paren- 
thesis; however extra parenthesis do not have any adverse effect. 

Some numerical representations to illustrate the order of execution are 
as follows: 


Expression Equivalent 
3X5 +2 3x (542) 
21 24 
1-2-3 1-(2-3) 
2 2 
_ (1-2)-3 ie 
u 
gre 5x(-2) 
10 “410 
_ 5x2 5x(=2) 
10 “40 
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Table 3-1 


Examples of Data Object Forms 


Numeric , Character 

Value Rank Shape Structure | Value Rank Shape 
(Example) | (Example) 
OG 0: 2 1 3 VECTOR | AnB138 6 
sg ee ya a MATRIX TEXT 2 
24 29°95 2 2 3 TYPE 
sss a 3 3 3 2 || ARRAY ABCD 
171 422 | 
131 132 : | EFGH 
aig O99 | | IJKL 
224992 : | 
231 232 | : 1 MNOP 

i i 
s11-392 3 | | QRST 
321 322 | : 
331 332 UVWX 


PRIMITIVE FUNCTIONS AND OPERATORS. 


~~ 


APL/700 provides a set of statement or expression forming functions 
called standard or primitive because they are immediately available 
to the user for application. That is, once primitive functions are 
entered with specified arguments, a single result is obtained. These 
primitive functions and operators are grouped into the following 
application/function categories: 


ae Assignment and selection functions. 
be. Scalar monadic and dyadic functions. 
c. Structure functions. 

d. Mixed functions. 

e. set functions. 

f. Compound operators. 

g- Format functions. 


This section contains a description of the form and application of 
each category. 


ASSIGNMENT 


FUNCTIONS 


A VARIABLE IS A NAME WHOSE CURRENT MEANING IS NOT A LABEL, FUNCTION, OR GROUP. A 
NAME MUST BEGIN WITH A LETTER(A-Z, A-Z. A, OR &) AND MAY BE FOLLOWED BY ANY 
NUMBER OF ADDITIONAL LETTERS, DIGITS(0-9), OR UNDERSCORES(_). A VARIABLE IS GIVEN 


THE VARIABLE HAVE A VALUE, A VARIABLE MAY BE ASSIGNED AWY APL DATA STRUCTURE OF ANY 
TYPE. INSERTION MAY ONLY INSERT VALUES OF TRE SAME TYPE. WHEN THE REPLACEMENT 
PRIMITIVE IS USED ANY PREVIOUS VALUE THE VARIABLE HAD IS FORGOTTEN AND THE NEW 


VALUE IS ASSIGNED. 


a mae ean eneneensae @ @ @ 


INSERTION 


3-6 


a eo ob a2 @ Ww a 
ee ee ee Se ee ee oe) 


| 
| 
| 
| 
| 
| 
| 
| 
| A VALUE BY THE REPLACEMENT FUNCTION. THE REMAINING ASSIGNMENT PRIMITIVES REQUIRE 
| 
| 
| 
| 
| 
| 
| 


V MUST BE A VALID VARIABLE NAME. THE VALUE E BECOMES THE 
VALUE ASSOCIATED WITH VY. REPLACEMENT MAY BE IMBEDDED 

IN AN EXPRESSION. THE RESULT RETURNED BY REPLACEMENT 

IS THE VALUE ASSIGNED TO Y, I.E. E. 

V MUST BE A VARIABLE THAT HAS BEEN PREVIOUSLY ASSIGNED A 
VALUE. L IS A SUBSCRIPT LIST POR VY. THE SPECIFIED 
ELEMENTS OF VY ARE ASSIGNED THE CORRESPONDING VALUES 

PROM E. IF E IS A SCALAR THEN ALL SPECIFIED ELEMENTS 
ARE ASSIGNED THE SAME VALUE. THE RESULT OF INSERTION 

IS THE VALUES INSERTED, I.E. E. 

OPERATES IN THE SAME MANNER AS IF Y+V@E HAD BEEN 
WRITTEN. MAY NOT BE USED WITH SYSTEM VARIABLES. @ IS ANY 
SCALAR DYADIC PUNCTION. THE RESULT OF MODIFY IS 

THE VALUE ASSIGNED TO Y, I.E. V@E. 

OPERATES IN THE SAME MANNER AS IF V(LI*+V{L]@E HAD BEEN 
WRITTEN. @ IS ANY SCALAR DYADIC FUNCTION. CAN SAVE 
COMPUTER TIME IF THE SUBSCRIPT LIST L IS COMPLICATED. 
THE RESULT OF MODIFIED INSERTION IS THE VALUES 

INSERTED, I.E. VILE 


—_ 


SELECTION 
FUNCTION 


FORM: VCE1;22;...3;EK] 
WHERE: 
V IS A VARIABLE, CONSTANT OR PARENTHESIZED VALUE PRODUCING 
EXPRESSION. 
EI IS ANY VALUE PRODUCING APL EXPRESSION OR MAY BE EMPTY. 
K MUST BE EQUAL TO THE RANK OF V OR THERE MUST BE 1 LESS THAN THE 
RANK OF V SEMICOLONS. 


RESULT: 
IF BACH EI IS A SCALAR THEN THE RESULT IS A SCALAR- THE SELECTED 
ELEMENT OF V. TO UNDERSTAND THE SELECTION PRIMITIVE CONSIDER A 
FUNCTION F WHICH WHEN GIVEN TWO SCALARS FORMS AN ORDERED PAIR AND 
GIVEN A SCALAR AND AN (N-1)-TUPLE FORMS AN ORDERED N-TUPLE. THEN 
THE N-TUPLE MAY BE USED TO SPECIFY AN ELEMENT OF AN N DIMENSIONAL 
ARRAY. APL DOES NOT REQUIRE EI BE A SCALAR. CONSIDER F AS THE 
FUNCTION IN AN OUTER PRODUCT, I.E. THE RESULT OF Ao.F BIS A 
STRUCTURE CONTAINING ALL POSSIBLE ORDERED PAIRS WHOSE FIRST 
ELEMENT IS FROM A AND WHOSE SECOND ELEMENT IS FROM B. THE OUTER 
PRODUCT IS FORMED IN THE NORMAL WAY. LET EACH SEMICOLON IN THE LIST 
BE REPLACED BY o©,F AND FORM THE STRUCTURE OF ORDERED N-TUPLES. THEN 
SELECTION TAKES THE STRUCTURE OF ORDERED N-TUPLES AND REPLACES EACH 
N-TUPLE BY THE ELEMENT IT SELECTS FROM THE STRUCTURE IT IS INDEXING. 
EI MAY BE EMPTY IN WHICH CASE THE SUBSCRIPT IS TAKEN TO BE i(eYV)CI] 
WHERE V IS THE STRUCTURE BEING INDEXED AND I IS THE NUMBER OF 
THE DIMENSION FOR WHICH THE SUBSCRIPT WAS OMITTED. 
SELECTION MAY APPEAR ON THE LEFT OF THE REPLACEMENT. ONLY THE 
SELECTED VALUES OF THE VARIABLE ARE REPLACED. THE STRUCTURE TO THE 
RIGHT OF THE REPLACEMENT ARROW MUST HAVE THE SAME SHAPE AS THE 
STRUCTURE OF ORDERED N-TUPLES OR MAY BE A SCALAR. THE SELECTED 
ELEMENTS ARE ASSIGNED THE VALUES. IF THE SAME ELEMENT IS SELECTED 
MORE THAN ONCE FOR REPLACEMENT THE RESULT IS UNDEFINED. 


EXAMPLES: 
LET 11 12 13 14 
21 22 23 24 «> M 12345 «++ VY 
31 32 33 34 
THEN 22 «+ M[23;2] 3 «+ V[3] 
24 34 «+ M[2 334] 13 5 ++ V[1i 3 5] 
11 13 §4321+<«+ V[5 4 3 2 1] 
21 23 ++ M{3;1 3] 1234 5 «+ V[J 
31 33 
31 32 33 34 «++ M[3;] 
14 14 12214 «+ V[f1 221 4] 
24 24 «++ ME34 4) 
34 34 
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gre 


geo 
Gok 
AAP 
: Qry 
SOH 
eke © 
Oo © 
SHSRSSSR Sse ST Se Seer SS SSS SS SSS SSS SSS SSS SSS SSS SSH SSS SST HAST S SSS SSS SST SS SSS ST ST SSS SSS HS SSS SSS SSS SSS Ss SSS ss ss sss es ssssssssssssszsse | A > 
| @ | | nw = 
DYADIC SCALAR PRIMITIVE FUNCTIONS A@B | | MONADIC SCALAR PRIMITIVE FUNCTIONS ® B | Q 
| @ | | > 
SSeeSeS st eessseeea se seesSasees ao Ss sstSsescesese oes sSsseSaescse ses) Seaa ses sseesee esse sesessase ses Sess sess See es sees SSeses sso esses | ey 
DEFINITION OR EXAMPLE | NAME | | NAME | DEFINITION OR EXAMPLE | > 
SH teSSS ses esses Sess Sess aS eae SSeS ss eee sseceseess | see eoeees oe = roa ase SssseSses | SSsse sas Sea sase Sesser ssecssesesssssSsaesesessss 5 
1,5 +>  2+3.5 5.5 +> 243.5 “1.5 «> 2+ 3.5 | ADD | + | IDENTITY | O+B «> +B 3.5 +> 43.5 3.5 +> + 3.5 | a 
SSeS eae ee = Sate are eee aaa eae a Oe ee er Sees | en mer nnn fone foe rece nec nn [eee nr rr rt rr er nn ct rer etm enn e snes e wns earenn | 
“1.5 ++ 2-3.5 1.5 ++ 3,5-2 5.5. +> 2s" Bie5 | SUBTRACT | | NEGATE | O-B «+ -B ~3.5 «+ -3.5 3.5 +> - 3.5 | 
Pee See ae eee Se See er eee Se Se eee eee eee Se SS omen ne | ne | ee rr nn Pe er rr rr rrr rr en nner e rence cececne| 
5 +> 4x1.25 “3 +> 6x .5 0 ++ Ox .09 | MULTIPLY | x | SIGNUM | SIGN OF B: 1 ++ x*7,2 0 ++ xO “41 +4 x73 [ 
Sse ee Sse e eee Sees shee SSeS he sees sS See e ees | eno nee ne een en fone fern rrr nn [mr rn rr rr rr rrr rn rr rrr rr rer rere c cree e| 
Lt6 4 "3 523-2 "5 «> 10% 2 4 4 1243 | DIVIDE | + | RECIPROCAL | 1%*B ++ #B oe 92 / a ae | 
we rt tr etn ee cence ercen- | ------------ | --- | --- eo en enn fon en rr rr rr re rrr rnc c cece n--| 
A RAISED TO THE POWER B: QQ ++ 3x2 | POWER | * | EXPOMENTIAL| (2.71828...)*B 
1024 ++ 2*10 2 «> Ye, 5 "3 «+ ~27%(4#3) | | | |} 4 ++ *1.386294361... 20.0855... +> *3 | 
a a a a a aN a a an al  Retetecteteeteateteatetetadedl Ratatat Retetetetatatetatatetetel Ratetetetetatatetetetatatattetatatateitateheteietetetateatetetetateatetateteeteteatetatel 
(@B)+@4 ++ LOGARITHM OF B FOR BASE A <> A@B | LOGARITHM | @ | NATURAL | (2.17828...)@B N «> *@N +> ex | 
1.87506... «<> 10075 3 «> 208 | | | LOGARITHM | 1.386294361... +> @4 ~,693447... +> @.5 | 
SSR SSS RS ee eS ee Se Meee See Se eet a Sees | - nee nn eens one | enn en cr enn | er re rn cer rr nn rr rn rn enn cnr creer ne--- | 
LARGER OF A AND B +> AITB | MAXIMUM | [ | CEILING | SMALLEST INTEGER NOT LESS THAN B ++ [B | 
7 ++ 317 e016, 01b6s01 “3 «+ “3f°7 | | | } 4 +> — 3.141 oe ee F346 204. eo" F204 | 
mt rn rr ern een en nee | eee enn cnn [enn [me er enn Pere rn rr er rn ne cm rn en ener eee eccen-| 
SMALLER OF A AND B ++ ALB | MINIMUM | L | FLOOR | LARGEST INTEGER NOT GREATER THAN B ++ LB | 
3 +> 317 6.01 «> 6.0116.01 “7 ++ 31°77 | | | | See bested “4 «> L°3.141 101 ++ L101 | 
Rea e Rea See SAS es eta eS es eee eS RS eee es | ------------ |---| eee enn en nee [on en rrr rr rr rr rt rer rr rr err c cnc cee| 
3 ++ 5113 B-Ax | BtA ++ AIB FOR Az#0 | RESIDUE | | | MAGNITUDE | ABSOLUTE VALUE OF B ++ |B | 
5 «> 0{[5 B +> AIB FOR A=0 | | | |} 9.5 ++ [9.5 9.5 «> | 9.5 0 ++ |0 | 
5 +> 1415 | | | | | 
614 «> 113.44 uo<«> 5]°11 1 ++ “417 | | | | | 
Pree ae SSSR See SSS eee eer eee re Se eseas [eeSes aoe ae [eed | Mie ee eee se | or eee See se Speer ee See Sete eee eee eee ser oe | 
6 ++ 214 (!B)+(!4)x!B-A FOR ASB [COMBINATION | ! | FACTORIAL | Bx!B-1 «+ !B FOR B21, B AN INTEGER; 1 «+ !0 | 
0 «+ 933 1 «> 515 0 «+ A!B FOR A>B | | | | GAMMA(B+1) «+ !B FOR NON-INTEGER B 6 ++ 33 | 
“10 «> 3!°3 OI9346oe5 +> 1.71455 | | | | 39916800 +> !11 2.6834H... +> 12.3 | 
| | | | 3.3283... «> !°2.3 | 
trie eee ese tae Sate a eae aR ee Reese Ree | ------------ | --- | --- - eo ee nnn | err en rr rr rr nr re er cre cc cccccce-| 
(1-B*2)*.5 «+ 00B (1-B*2)*.5 ++ O0OB | CIRCULAR | 0 | PI TIMES | Bx3.14159... «> OB 6.283185... ++ 02 | 
ARCSIN B «> ~10B SIN B ++ 10B | | | | | 
ARCCOS B ++ ~20B COS B ++ 20B | | | | 
ARCTAN B «+ ~30B TAN B «+ 30B | | | | | 
("14+B*x2)*.5 ++ “SOR (1+B*2)*%.5 <> 4OR | | | | | 
ARCSINH B «+ 50B STHNH B «+ SOB | | | | | 
ARCCOSH B «+> ~60B COSH B +> 608 | | | | | 
ARCTANH B <+ ~70B TANH B «+ 70B | | | | | 
we an ne re en er nee men to een nnn one | ------------ |---| --- eee ee nnn | en rr rr rr rr en re ener ceeccee| 
00 0@1 160 161 BOOLEAN DOMAIN (0 OR 1)| ” | ~ | Nor | 0 «++ ~1 1 «+ ~0 BOOLEAN DOMAIN (0 OR 1) | 
0 0 0 1 | AND | A | | | 
0 1 1 4 | OR |v] | | 
7 1 4 0 | NAND | w# | | | 
1 0 ) ) NOR | » | | | 
[Sta Ss se Ses ee See eS ae eS eee eS See aie | eee nn ne en cnn fone | en rr nn er rn rr rr rr ren mr enn ener cere nec e cree en-| 
00 1@0 O@1 11 3@4 303 4@3 | | | | | 
) ) 1 ) 4 0 0 | HESS. 1 -<: | | | 
1 0 t 1 i 1 0 [NOT GREATER | s | | | 
1 @) 0 1 @) 1 0) | EQUAL | = | | | 
1 1 0 J 0 1 4 | HOP LESS [>| | | 
0 1 0 0 0 0 1 | GREATER | > | | | 
0 1 st @) 1 0) 1 | NOCT EQUAL | = | | | 


ce ere re ee er ee ee ee ce ee ee ee ae ee ee ee ee ee cue aoe 


DYADIC AND 
MONADIC FUNCTIONS 


(cont ) 
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‘@' IS ANY MONADIC SCALAR PRIMITIVE FUNCTION. ‘@' IS ANY DYADIC SCALAR PRIMITIVE FUNCTION. 


eB 
THE RESULT OF A MONADIC SCALAR PRIMITIVE FUNCTION APPLIED TO AN ARRAY IS AN ARRAY OF THE SAME 
SHAPE. ELEMENTS OF THE RESULT ARE THE RESULT OF APPLYING '®' TO THE CORRESPONDING ELEMENTS OF B. 


AeB 


IF A AND B ARE ARRAYS OF THE SAME SHAPE THEN AN ELEMENT OF THE RESULT IS THE RESULT OF APPLYING 
'@' TO THE CORRESPONDING ELEMENTS IN A AND B. THE RESULT HAS THE SAME SHAPE AS A. IF EITHER A 

OR B IS AN ARRAY CONTAINING ONLY ONE ELEMENT OR IS A SCALAR THEN AN ELEMENT OF THE RESULT IS 

THE RESULT OF APPLYING ‘@' BETWEEN THE ONE ELEMENT AND THE CORRESPONDING ELEMENT OF THE OTHER 
ARRAY. THE RESULT HAS THE SAME SHAPE AS THE ARRAY NOT CONTAINING THE ONE ELEMENT. IF BOTH ARRAYS 
CONTAIN ONE ELEMENT THEN THE RESULT IS A ONE ELEMENT ARRAY WITH RANK EQUAL TO THE LARGER OF THE 
RANKS OF A AND B. 


A@( KIB 


A AND B ARE ARRAYS WITH ONE OF RANK ONE GREATER THAN THE OTHER. THE SHAPES OF A AND B MUST BE THE 


SAME IF THE K TH DIMENSION OF THE ONE OF “GREATER RANK IS ELIMINATED. THE RESULT HAS THE SAME 
SHAPE AS THE ARRAY OF LARGER RANK. ELEMENTS OF THE RESULT ARE FORMED BY APPLYING ‘@' BETWEEN THE 
CORRESPONDING ELEMENT OF THE ARRAY OF LARGER RANK AND THE ELEMENT OF THE ARRAY OF LESSER RANK 
WITH THE SAME INDICES EXCEPT FOR THE K TH WHICH IS NOT USED, THE SAME ELEMENT OF THE ARRAY OF 
LESSER RANK IS APPLIED TO ALL ELEMENTS OF A VECTOR ON THE K TH DIMENSION OF THE ARRAY OF LARGER 
RANK. THE '(K]" MAY BE ELIDED IF K IS FOUAL TO THE RANK OF THE LARGER ARRAY (IN ORIGIN 1). 


am oe ae wm a Om a ow am a om om a aw ae am ow am ow a om ae Gm em om ow oe em ew ow am aw om a a oo CF ae a a oe a oe oe aw oe a we me ew ww 
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5 Op) 
GH 
| emeeeeeeeesenssesses eres ees esse ssrsiessssasssssssssssssssssrsssssssesssssscssrosssssessessssssssssssssssssesssssssssssssescsses| A ie 
| | HQ 
| STRUCTURE PRIMITIVE FUNCTIONS ] 4 Ky 
| | O 
|eeeneeesese esse essere reese sees settee esses sess ss sss ssss esses ssesssssssssssssssssse sess rs esses snes ssssessssssssssseseessseeeee = 
| THE RIGHT ARGUMENT OF ANY STRUCTURE PRIMITIVE FUNCTIONS MAY BE A THE FOLLOWING VARIABLES ARE USED IN THE EXAMPLES: | a es 
| CHARACTER STRUCTURE. SINCE CATENATE AND LAMINATE JOIN TWO STRUCTURES, 111 112 113 114 | 
| IF THE RIGHT ARGUMENT IS A CHARACTER STRUCTURE THE LEFT ARGUMENT MUST 12345 «++ V 121 122 123 124 | 
| ALSO BE A CHARACTER STRUCTURE. ALL OTHER STRUCTURE PRIMITIVE FUNCTIONS 131 132 133 134 | 
| OPERATE IN THE SAME MANNER ON CHARACTER STRUCTURES AS ON NUMFRIC +> fT | 
{| STRUCTURES. FILL FOR TAKE AND EXPAND IS BLANKS IF THE RIGHT ARGUMENT 111213 14 211 212 213 2144 | 
| IS A CHARACTER STRUCTURE, 21 22 23 24 ++ M 221 222 223 224 | 
| 31 32 33 34 231 232 233 234 | 
BSSSSSR SS SSS SS sss sss sssssssetssessessrsstesss se ssssssssssssssssss esses ser sa sss sess sss assess sssssssssssssssesssssssssssesssssearses| 
: NAME ) FORM | DEFINITION | EXAMPLES | 
asses SBenezaaacs Saessses | sssessssseesssasssssesesstssssetesesrstsssssssseresesrscesoss | ee csssr sees esse aS SSSesseaeessresesssssssss=z | 
| RESHAPE | 4pB | THE STRUCTURE B IS MADE INTO THE SHAPE SPECIFIED BY A. 1 5 5 5 ++ 395 
| | | IF B HAS LESS ELEMENTS THAN ARE NEEDED THE ELEMENTS OF B |} ,1 «+ 1pV | 
| | | ARE REUSED UNTIL ENOUGH ELEMENTS ARE OBTAINED. IF B HAS MORE| 2.5 «> (10)92.5 8.6 3.1 | 
| | | ELEMENTS THAN ARE NEEDED THE EXCESS ARE IGNORED. | 14 2 | 
| | | ,4 +> pAoB | 3 4 ++ 3 2pV | 
| | | oe ae | | 
| een eee en-- [meee nee- | we te nn nn ne on ee ne ne ee ee eee +e | an nn en ee er ee ene | 
| RAVEL | 8 | THE STRUCTURE B IS RESHAPED INTO A VECTOR. | 11 12 13 14 21 22 23 24 31 32 33 34 +> ,M | 
| | +B +> (x/pB)pB |} 198.6 ++ ,8.6 | 
mete | mm eee cen | een nn nn nn nnn nn ne rn ne ee ee ee eee | wr en er een en en en ee en een en ---| 
CATENATE 4.B THE STRUCTURES 4 AND B APE JOINED TOGETHER 123451234 5 «+ VV 


| | | 
| TO FORM A NEW STRUCTURE, THE STRUCTURES ARF 171234 5 «++ 7,V | 
| JOINED ALONG THE LAST DIMENSION. A SCALAR IS | 711 12 13 14 | 
| EXTENDED TO FORM A PLANE ACROSS THF DIMENSION IT IS | 8 21 22 23 24 ++ 7 8 9,M | 
| BEING JOINED TO. | 9 21 22 23 24 | 
| } 11 12 13 14 1 | 
| | 21 22 23 24 1 ++ M,y1 | 
| | | 


31 32 33 34 1 


| | REVERSAL ALONG THE K TH FROM LAST DIMENSION. | 24 23 22 21 «> e[1]M : 


| 4,CK]B | LIKE 4,8 BUT THE STRUCTURES ARE JOINED ON THE | 11.12 13 14 | 
| | K TH DIMENSION. | 21 22 23 24 ++ M,[1]7 8 9 10 | 
| | | 31 32 33 34 | 
| | | 7 8 9 10 | 
| merece nee- Jer ccerne | eer ee en ew wn we nn ew rn en en en een nent en nn et rene ee | eer me te en re rn et een wen ewer erence er nens | 
| LAMINATE | A,CK1]B | THE STRUCTURES A AND B ARE JOINED ALONG A NEW | 1 100 | 
| | | DIMENSION. K MUST BF NON-INTEGRAL AND BETWEEN THF NUMBERS | 2 200 ++ 1 2 3,f1.517100 200 300 | 
| | | OF THE DIMENSIONS BETWEEN WHICH THE NEW DIMENSION IS | 3 300 { 
| | | FORMED. A SCALAR IS EXTENDED TO THE SHAPE OF THE OTHER 11234 5 | 
| | | OBJECT. | 888 8 8 ++ V,[.476]8 
| eee enn nn-e | -------- | meme nen nn er em ee en nen ee nn een tenn n nn nn- | ee en rr nn nn ee ee ene ne rere ene | 
| REVERSE | oB | B VECTOR: THE ORDER OF THE ELEMENTS IN B IS REVERSED. 54321 «+ OV | 
| | | B ARRAY: THE VECTORS ON THE LAST DIMENSION OF B | 14 13 12 11 
| | ARE REVERSED. | 24 23 22 21 ++ OM | 
| | | 34 33 32 31 | 
| | | B SCALAR: NO ACTION OCCURS WHEN B IS A SCALAR. | 1.5 «> $1.5 | 
| mem ccene | mmr rn wn er ne nn ne en te ne nn er re ne een een eee | mem me nn nn en eer ne ne nn ener en ener erene- | 
| | $C€K1B | SAME AS 6B BUT VECTORS ON THE K TH DIMENSION {| 31 32 33 34 | 
| | ARE REVERSED. | 21 22 23 24 «+ o{1]M | 
| | | | 11 12 13 14 | 
| ---eee-- | ee ne nn nn en en nn nn er ne et ee een e ene | ene en er en en nnn re emer ene rn cece | 
| | eB | eB <> o[1]B | 31 32 33 34 | 
| | | REVERSAL ALONG THE FIRST DIMENSION. | 21 22 23 24 ++ ©3 39M | 
| | | { 1112 13 14 | 
| [enn een-- | oe me en nn ne nn er en en en eter eee | een ee mn re rr ee ee ee ere nneee 
| | e@C{KIB | eLKIB ++ $£1+(ppB)-KIB ee ec ae es | 
| 
| 
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B VECTOR: THE ELEMENTS OF THE VECTOR ARE ROTATED TO 
THE LEFT CYCLICALLY (p8)|4 POSITIONS. 

B ARRAY: VECTORS ON THE LAST DIMENSION OF 8B 

ARE ROTATED BY THE AMOUNT SPECIFIED BY THE 
CORRESPONDING ELEMENT IN 4. 4 MUST BE AN ARRAY 

OF RANK ONE LESS THAN THE RANK OF 8 AND SHAPE 

SAME AS 8 LESS THE LAST ELEMENT. 4 MAY BE A SCALAR IN 
WHICH CASE IT SPECIFIES THE ROTATION FOR ALL VECTORS. 
B SCALAR: NO OPERATION IS PERFORMED IF 8 IS A SCALAR. 
LIKE 4%¢B BUT VECTORS ON THE K TH DIMENSION ARE 
ROTATED, 


cnr ae eruwrerawenwnwenmewe eke woeenwnrmwanwrnwnanwemrnanewernwanwnwwranwzeweraeerewewreeweewaoe sm eo @ © ew = 


4eB +> 40(1128 
ROTATION ON THE FIRST DIMENSION. 


ACCKIB +> 4o(1+(09B)-KI1B 
ROTATION ON THE K TH FROM LAST DIMENSION. 


B SCALAR: THE RESULT IS B AS A 1x 1 MATRIX. 
B VECTOR: THE RESULT IS B AS A COLUMN VECTOR(A 
epB x 1 MATRIX). 


B ARRAY: THE RESULT IS B WITH THE DIMENSIONS 
REVERSED. 
(.ppB)8B «+ &B FOR 2sppB 


THE DIMENSIONS OF B ARE PERMUTED AS SPECIFIED 

BY 4. THE I TH DIMENSION OF B IS THE ACI] DIMENSION 
OF THE RESULT. SEVERAL DIMENSIONS OF B MAY BE MAPPED 
INTO A SINGLE DIMENSION OF THE RESULT TO OBTAIN A 
DIAGONAL CROSS SECTION OF 8. IF 4 IS THE SAME AS 
1ppB THEN THE RESULT WILL BE 8B. 


B VECTOR: 4 MUST BE A LOGICAL VECTOR WHOSE LENGTH IS 
IS THE SAME AS THE LENGTH OF B. THE RESULT HAS LENGTH 
+/4. THE ELEMENTS OF THE RESULT ARE TAKEN FROM 8 EVERYWHERE 
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A 1 APPEARS IW 4. 4 MAY BE A SCALAR IN WHICH CASE THE RESULT | 


IS 8 IF 4 IS 1 AND THE EMPTY VECTOR FF 4 IS 0. 
B ARRAY: VECTORS ON THE LAST DIMENSION OF B ARE COMPRESSED 
BY 4. 


B SCALAR: B IS EXTENDED TO THE LENGTH OF THE VECTOR 4 AND 
THEN COMPRESSED BY 4. 

LIKE A/B BUT VECTORS ON THE K TH DIMENSION 

ARE COMPRESSED. 

478 +> 4/(118 

COMPRESS ON THE FIRST DIMENSION. 

A*CKIB <> 4/01+(99B)-KIB 

COMPRESS ON THE K TH FROM LAST DIMENSION. 
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21 22 23 24 ++ “1 0 16M 
32 33 34 31 

12 13 14 11 

22 23 24 21 +> 56M 

32 33 34 31 
5 <> “865 
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11 22 33 14 ++ “4% ~3 "2 “16(1]M 


12 22 32 ++ 2 1QM ++ QM 


11 22 33 <> 1 18M 

111 121 131 ++ 1 2 187 
212 222 232 

123 4 5 «+ 1aV 
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| | | 
EXPAND | 4\B | B VECTOR: & MUST BE A LOGICAL VECTOR SUCH THAT +/4 IS THE 10120345 0«701101141 0\N : 
{ | SAME AS THE LENGTH OF 8. THE RESULT HAS THE SAME LENGTH AS | | 
| | & WHERE SUCCESSIVE ELEMENTS OF B ARE USED WHERE EACH 1 | | 
| | APPEARS IN 4 AND FILL IS INSERTED WHERE EACH 0 APPEARS. | | 
| | B ARRAY: VECTORS ON THE LAST DIMENSION OF 4 ARE } 11 0 12 13 0 44 | 
| | BXPANDED BY 4. | 21 0 22 23 0 26 ++ 10110 1\M | 
| | 31 0 32 33 0 34 | 
| 1 B SCALAR: B IS EXTENDED TO LENGTH +/4 AND THEN | j 
EXPANDED BY 4. 1000077704 000011 1 O\7? | 
eee wn | oe ew we we ww we ee oe ww on ow ot we on on oe wn ee ow een ee ene ee een ween | nn nn nw wo ww mew ewer en ecee 
| A\CKIB | LIXE 4\8 BU? VECTORS ON THE K TH DIMENSION } 1112 13 14 
| | ARE EXPANDED. | 0 0 0 0 | 
| | | 21 22 23 26 ++ 1010 1\C1I]M I 
| | 1 0 0 0 0 | 
| 31 32 33 34 | 
wc meen | mee cw nn cnn ce nen en mr en nnn me en nn en en en enn en cent cnn ceenecece | men rr en ne cn nn ne mn nn nee enn ee nee ence wee nnne| 
1 A488 | As8 «> A\C108 | 0 0 0 0 i 
| | EXPANSION ON THE FIRST DIMENSION. J 11 12 13 14 | 
| | |} 21 22 23 26 ++ 0 11 0 14M | 
| | ! 0 0 0 0 | 
{ | 31 32 33 34 | 
weccece- | mr rn rn nn rn nn rn en nn rr rn cn nen ee nnn | ce nn rr nem ne ne ee en nen een neces ew ncnn=| 
| AxCK1B | 4xCK1B +> A\E1+(90B)-KIB8 } 0 11 0 12 0 13 14 { 
| | EXPANSION ON THE K TH FROM LAST DIMENSION. } 0 21 0 22 0 23 24 ++ 010101 1kC1I)M | 
| | | © 31 0 32 0 33 34 | 
weeotceren ad dN aca un a lata cen ehcp ping aa a ea aca ta | 
TAKE | ate | 8 VECTOR: THE RESULT IS THE FIRST(LAST) |\4 ELEMENTS OF } 12 3 «> 347 { 
| | 8B IF 4 IS POSITIVE(NEGATIVE). IF \4 IS GREATER 1} 34 5 ++ “347 { 
i | THAN THE LENGTH OF B THEN FILL IS ADDED AT THE 1123 4% 500 +> 747 { 
| | EWND( BEGINNING) OF 8B. $}00123 4 5 ++ “74V | 
| | 8 ARRAY: A MUST BE A VECTOR WHOSE LENGTH IS EQUAL 70 THE |} 11 12 13 | 
| | RANK OF 8. THE RESULT OF TAKE IS A CORNER OF THE ARRAY. | 21 22 23 «+ 3 34m | 
| | | 31 32 33 | 
| | 1 0 0 0 0 0 { 
| | ! 0 0 0 0 0 | 
| | } 1112 13 14% 0 ++ “5 S4M | 
| | | 21 22 23 24 0 { 
| | | 31 32 33 34 O | 
| | 8 SCALAR: B WILL BE MADE INTO A ONE ELEMENT OBJECT WITH RAWK| 0 3 | 
| THE SAME AS THE LENGTH OF 4 THEN THE TAKE IS DONE OW IT. | 0 0 «+ 2 “24°73 | 
eer ener cee| cron e-e- | en an nn nn nn nn rr en rr nn nen ren nn nn nn | ee rn nn ern cee nner emer ener e nee n nc ene nn nnn-- | 
DROP | A+B | B VECTOR:TRE RESULT IS B WITH THE FIRST(LAST) |\4 1 4 5 ++ 34V 1 
| | ELEMENTS OF 8 REMOVED IF 4 IS POSITIVE(NEGATIVE). | 12 «+ “3+V { 
| | IF |4 IS GREATER OR EQUAL TO THE LENGTH OF B THE | 10 ++ 747 { 
| | RESULT IS AWN EMPTY VECTOR. | 10 «+ “74V 
{ | 8 ARRAY: 4 MUST BE A VECTOR WHOSE LENGTH IS EQUAL TO THE } 11 12 | 
| | RANK OF 8. THE RESULT OF DROP IS A CORNER OF THE ARRAY. | 21 22 «+ 0 “24M { 
| | | 31 32 | 
| 1 B SC4L4R: B WILL BE MADE INTO A ONE ELEMENT OBJECT WITH RANK| 1 1 198 ++ 0 O 048 | 
| | THE SAME AS THE LENGTH OF 4 THEN THE DROP IS DONE ON IT. 1010 1p 1.75 «++ 5 0 1 OF 1.75 | 
SSRSSSSSSSHSASSSSSSsSsSSSePss Ss SS Sees SssASssssssesssesssrssssss sss es srssesser es ssssresssrerssesesessrenrsssrssesssesessesessesasssscz | 
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SSERTASSSSH SS SS SSSSSSSSSS TSS TS ST SRSA SSAA SAS STS SSS SS SSS SS SSS SSS SSS SSH SSSR Ss SSS S sss Sse sess ss sssesessssessessssssesenressssessssers3 | 
NAME | PORN | DEFINITION | EXAMPLE | 
Sseszeazezessesss | sesaese | sssssasscssessaersssrsesssssesseesssasseesessssezezssessssasess |eeressssresesesesersrssessesseseereseese2 | 
SHAPE 1 oB | SHAPE PRODUCES A VECTOR WRICH IS TRE SHAPE OF THE |} ,5 ++ p 27101 2 | 
| | ARGUMENT. | 23 4 +> p2 3 4p124 | 
| »A +> pdpB ! 10 «+> p'A! : 
INDICES | 1B | 8 MUST BE A WON-NECATIVE INTEGER SCALAR. THE RESULT $1234 5 «+ 15 { 
| | IS A VECTOR OF LENGTH B OF THE FIRST B INTEGERS | ,1 +> 11 | 
| | STARTING AT THE INDEX ORIGI¥. | Opo ++ 10 | 
| | 10 «+ HE EMPTY NUMERIC VECTOR. \N «> (1N-1),N IN ORIGIN 1.]| { 
ee re | a nn an ww ww wn ne ne nw nn nn nn ne nn rn ne ee nn | pr rr rr rr ee en cen nn ee enna { 
INDEX | 4.8 | 4 MUST BE A VECTOR. PHE RESULT IS A STRUCTURE WITH THE | 3 +> 4 7 10 22110 | 
| | SAME SHAPE AS B. EACH ELEMENT OF THE RESULT IS THE } 12 1 3 «+ "ABCABCDE'\'ABAC! | 
| | INDEX IN 4 OF THE TRE FIRST OCCURENCE OF TRE | 
{ | CORRESPONDING ELEMENT IN 8. IF THE ELEMENT DOES WOT OCCUR 1424 1 ++ “101110 0 16 “1 | 
| | IN 4 THE RESULT IS 1+p4(IN ORIGIN 1, p4 IN ORIGIN 0). | && & +> "ABC'11 2 3 ] 
wer ee eee nee n oe | mm men | en nn an ne nn nn ne nn ne nn on en en ee re nn nn | peer nn ene re ent re ence nen eccenre--| 
QUOTE | vB | THE RESUL? IS A CHARACTER STRUCTURE WITH THE SAME 1 12 3' «++ 12 3 | 
| | SHAPE AS B EXCEPT THE LAST DIMENSION IS EXPANDED. | "APL* «+ w'APL! | 
| | THE RESULT IS A CHARACTER REPRESENTATION OF B. 1 : 

mew eee ene eneee- | me nn | nn ne ne ee en nn nn ne ne nn ne en nn ne nn en nn | ee err rr nnn nn cm nnn enn e rere e renee 
PORMAT | A¥8 | SEE FORMAT CHART. | 
aaa aettates | me nnn | ene nn ne nn on rn nn nn nn nn rr rn en nn rn nn rn ee nnn | pert rn en rn ner nrc cece n ce ceren--| 
EXECUTE | «#8 | B MUST BE A CHARACTER STRING WHICH IS A VALID APL EXPRESSION.| 4% ++ #'2+2! | 
| | THE RESULT OF EXECUTE IS THE RESULT PRODUCED FROM THE ° $1234 5 «> 915! | 
| | EVALUATION OF THE EXPRESSION IF If PRODUCES A RESULT. ‘ | "APL" «+ gt""ApLt'' | 
| | IF THE EXPRESSION DOES NOT PRODUCE A RESULT EXECUTE MUST | “2 “1012 «++ ev 2101 2 | 
| | BE THE LEFTMOST OPERATOR IN THE STATEMENT. | : 

wee ee ewe ee ee nee Se Se 
REPRESENTATION| A4tB | B SCALAR: IF 4 IS A VECTOR THE RESULT IS A VECTOR THE | 101 ++ 2 2 2T5 | 
| | SAME LENGTH AS 4. THE RESULT CONTAINS THE REPRESENTATION OF | 0 26 23 ++ 24 60 6071583 
| | B IN THE NUMBER SYSTEM 4. IF 4 IS AN ARRAY THER THE RESULT | 10 | 
| | IS THE REPRESENTATION OF B IN PRE NUMBER SYSTEMS 1 0 3 ++(3 2p4 5)T17 | 
| | SPECIFIED BY VECTORS ON THE FIRST DIMENSION OF 4. } 1 2 
| | B ARRAY: THE RESULT WILL BE A STRUCTURE WITH SHAPE (p4),0B } 1100 | 
| | WHERE VECTORS ON THE PIRST DIMENSION OF THE RESULT ARE THE 104110 <+«++ 2 2 274 73 °0 
| | REPRESENTATION OF A SCALAR IN B IN THE NUMBER SYSTEM | 0110 | 
| | SPECIFIED BY A VECTOR ON TRE FIRST DIMENSION OF 4. | | 
| | PUNCTIONS IN A MANNER SIMILAR TO OUTER PRODUCT. | ! 

wee ew ee ee wee ee Se ee ttle 
BASE-VALUE 418 | B VECTOR: IF 4 IS A VECTOR THEN THE: RESULT IS A SCALAR } 5 «++ 2 2 21101 : 
| 
| 
| 
| 
| 
| 
| 
i 
| 
[ 
| 


MIXED PRIMITIVE FUNCTIONS 


WHICH IS THE BASE 10 VALUE OF THE VECTOR IN THE NUMBER SYSTEM| 
SPECIFIED BY 4. 4 MAY BE A SCALAR IN WHICH CASE IT IS | 
EXTENDED TO THE LENGTH OF B. IF 4 IS AN ARRAY THE RESULT HAS | 
SHAPE ~1+p4 AND CONTAINS THE REPRESENTATION IN BASE 10 | 
OF 8 IN THE NUMBER SYSTEM SPECIFIED BY A VECTOR ON THE LAST | 
DIMENSION OF 4. , | 
B ARRAY: THE RESULT IS AM ARRAY WITH SHAPE ("1+p4),1+08. { 
THE RESULT IS SCALARS WHICH ARE THE BASE 10 REPRESENTATION | 
OF VECTORS ON THE FIRST DIMENSION OF 8 IN THE NUMBER SYSTEMS | 
SPECIFIED BY VECTORS ON THE LAST DIMENSION OF 4. | 
FUNCTIONS IN A MANNER SIMILAR TO INNER PRODUCT. | 


1583 +> 24 60 6010 26 23 
15 +> 211 11 #1 
22 30 38 ++ (3 295 5 779 9)4L4 2 


4% 6 ++ 2 2 213 2911010 0 
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| | 

ARRAY-INVERSE | B | B MUST BE A MATRIX WITH NO | 3.5 “1.5 0.5 | 
| | MORE COLUMNS THAN ROWS. THE RESULT IS THE INVERSE OR | “4 2 “1 ++ 83 3p(4p1),2 3 “2 “1 2] 
| | GENERALIZED INVERSE OF THE MATRIX IF IT EXISTS. |} 1.5 “0.5 0.5 | 


| B MUST BE A MATRIX WITH NO | 
| | MORE COLUMNS THAN ROWS. A IS EITHER A VECTOR WITH LENGTH | 
| | EQUAL TO THE NUMBER OF ROWS IN B OR A MATRIX WITH THE SAME | 
| | NUMBER OF ROWS AS B. THE RESULT IS THE SOLUTION TO THE SYSTEM\ 
| | OF LINEAR EQUATIONS WITH COEFFICIENT MATRIX B AND RIGHT HAND | 
| | SIDE(S) A IF IT EXISTS. WHEN B HAS MORE ROWS THAN COLUMNS | 
| | THE RESULT IS A LEAST SQUARES FIT FOR THE SYSTEM. | 


GRADE-UP | 4B | B MUST BE A NUMERIC VECTOR. THE RESULT IS A SET OF INDICES 125413 «+ 48 0950 | 

| THAT CAN BE USED TO ORDER B IF ASCENDING ORDER. | | 

were nen nnn | ------ | en nn rn rn nn ee nnn | re rn rr nn nn en ee ene ee ee eee eee | 

GRADE-DOWN | ¥B | B MUST BE A NUMERIC VECTOR. THE RESULT IS A SET OF INDICES 1314 25 «+ ¥8 095 0 | 

| | THAT CAN BE USED TO ORDER B IN DESCENDING ORDER. | | 

wrt ere cence nee | merece | me en re rr nr rr rr rn rr nnn enn [mee rr ern rr re nr nee n en nn ee | 

ROLL | ?B B MUST CONTAIN POSITIVE INTEGERS. THE RESULT IS A STRUCTURE | 11 ++ 711 | 

| LIKE B WITH FACH ELEMENT A RANDOM CHOICE FROM | | 

{ 1S WHERE S IS THE CORRESPONDING ELEMENT OF B. | | 

wcrc nee [mere | ce rr rr rr rr rn rn nn [nr ne ne nn ee - - --- | 
DEAL A AND B MUST BE NON-NEGATIVE INTEGERS WITH A NOT GREATER ,1 +> 171 


OF THE RESULT ARE A RANDOM SELECTION WITHOUT REPLACEMENT 


| | 
THAN B. THE RESULT IS A VECTOR OF LENGTH A THE ELEMENTS | 10 ++ 0710 | 
| | 
FROM \B. | | 


p> 
x) 
ity 


SET FUNCTIONS 


SET PRIMITIVE FUNCTIONS 4 @ B 


TTTTITTITITICIITITrrirrrriiririrrrrererrrrrrrritertttitrorittittret te -s 
ERQERwteeeaeses | eas | secre STS CSRS SSTE TS SLSRSSAAEASARESSTSASAIASETSSTESISRESASS 
MENBERSHIP | ¢ | 4eB ++ V/Ae.=,B 4011+ 123 16135 


| | 
| | 
| | 
! ! 
| NAME i | DEFINITION OR EXANPLE ; 
| 
l | 
| 1 +> 10€10 20 30 0 ++ 10640 50 60 | 
| O11 <> "BOoYte*COUNTRY' 0100001 +> "COUNTRY'e'BOY'| 


A4uB ++ A VECTOR OF DISTINCT ELEMENTS FROM 4 OR 8 | 
12345 6 +> 1 2 3u4% 5 6 123 4% 5 ++ 123 4u2 34 5 | 
"BOYCUNTR' ++ ‘BOY'u'COUNTRY' 123 «+ 11 #2ui1 3 3 | 
"COUNTRYB' ++ ici cede ‘MANGET* ++ Riucclonasuetieane 


| 
| 
| 
| 
| 
| 
| 
INTERSECTION | a | 4nB «+ A VECTOR OF DISTINCT ELEMENTS IN BOTE 4 AND B 

| 23 ++ 12 3n2 34% ‘HAR' ++ 'HARRY'n'"MARTHA' 

| 

| 

| 

| 

| 


| 
| 
| 
| 
| 
| 
| 
| 
| 
| "APL' ++ ‘APPLIED'n ‘PLAN 
| 
| 
| 
| 
| 
| 
| 
| 
| 


l 

| 

| 

“EXCLUSION ~ | 4~B ++ A VECTOR OF DISTING? ELEMENTS IN 4 BUT WOT IW B | 
~1 +> 12 3°23 4 ~'B' «+ "BOY'~'COUNTRY' | 

‘TNC! «+ 'PLATONIC'~' PAOLI' ‘MISP' ++ "MISSISSIPPI'~'' | 

ewe @©@8@ @2@® @ @ @ @ w a - an @ oe we ee wn ow we ow wee eee mew mec cw we meres wae eaweecoccccnan | 
| SUBSE? | ¢ | 4cB «+ A/,AeB 1 ++ 1 2ch 3 2 1 | 
| 0 +> 122 34 5 1 ++ "PAOLI'c'PLATONIC' [ 

=2ewewes @ @ @ @ @ @ @& ow @& Jo-- ee ee ew ew we oe ee oe we ee een we ee ewww we we we wwe weewece= | 
| SUPERSET | > | 428 «> A/, Bed 1 ++ 2233 4 492 3 & | 
| | 0 ++ 224 4 6 622 3 & 0 +> "PAOLI'>'PLATONIC' | 
[| aseseszesseseres SRSSSKSSSSSSSSRSSSSSSSSSSSSSSSSSSSSR STS SSSSSSSSSSSSSTSSSeeaess | 


ar 


OL=t 


ome 
ht © 
Wwe 
= rg 
SS SSR BRST SSH GK TSS TSS T ASSES RSS SS ST SS SSK RSS TSS SS TSS SSS SSS SS SATS SSS SSS SS SSS HSS SST S ST SH SSS SSS TSS eset ees sssssrsssrsssssssseessessses | eo) 
! HS 
COMPOUND OPERATORS | a = 
| 
SSS SSS SPS SH ST SHRP SS SS SS SHS SSS SSS SSersressss esse sss sess ss esr er senses sess srs ens ss sce sees sss sc sss sss esses ssssssssssessszssssssessese2 | Yn 
NAME | FORM | DEFINITION | EXAMPLES | 
SSissescesesses | esses csss Sarees sr srsagssssssssssssasssssesessrssasesssssssesessasssssssss | sssssessssessrsssessrssssese2eseze2zc= | 
REDUCTION | @/B | B VECTOR: SCALAR RESULT IS FORMED BY EXECUTING THE APL | 6 «+ +/1 2 3 | 
| | EXPRESSION FORMED BY PLACING @ BETWEEN THE ELEMENTS OF THE } 1.4 «++ -/2.3 5.6 4.7 | 
| | VECTOR. | | 
; | | IF B IS AN EMPTY VECTOR THE RESULT IS THE IDENTITY ELEMENT FOR |-1 «+ x/10 “u.31...F68 +> —/10 | 
| | @ IF IT EXISTS. | | 
| | B ARRAY: RESULT IS FORMED BY REDUCING VECTORS ON THE LAST | 1.5 4.8 7.875 ++ #/3 3919 | 
| | DIMENSION OF THE ARRAY. THE RESULT HAS RANK 1 LESS THAN THE | | 
| | RANK OF THE ARGUMENT. THE SHAPE OF THE RESULT IS THE SAME AS THE} | 
| | SHAPE OF THE ARGUMENT LESS THE LAST DIMENSION. | | 
| | B SCALAR: THE RESULT IS THE SCALAR B. B MUST BE IN THE DOMAIN 1 5 «> #/5 | 
| | OF @. | | 
| --------- | me a en nn ee en en ee eee eee ene | ma en ne en en en ee ee eee eee ene | 
| @/C€K1B | LIKE @ BUT VECTORS ON THE K TH DIMENSION ARE REDUCED. | 1.75 3.2 4.5 +> #/[113 3919 | 
| ee eeen ne | en ne en rn nn nn ne ee ee enn | enn een ne mr er ne en eee ene nee | 
| o/B | @4B ++ @/(1])B | 1.75 3.2 4.5 +> #43 3919 | 
| | REDUCTION ON THE FPIRST DIMENSION. | 6 +> +41 2 3 | 
| --------- | er rn nn er ee rec enne | me mn re ee eee enn | 
| @4CKIB | @¢0KIB ++ @/£1+(ppB)-K]B REDUCTION ON K TH FROM LAST DIMENSION.| 1.5 4.8 7.875 «> ##([11]3 3919 | 
wee ene nee nen ne | meee nnn | ee ne nn nn en ne nn ne ne nn nn rn ee nn en enn | ee ee ee ee re ne eee eee | 
SCAN | @\B | B VECTOR: RESULT IS A VECTOR OF THE SAME LENGTH WHOSE } 13 6 ++ +\1 2 3 | 
| | I TH ELEMENT IS @/I+B. | 2.3 93.3 1.4 «+ -\2.3 5.6 4.7 | 
| | B ARRAY: RESULT IS FORMED BY REPLACING VECTORS ON |} 4 0.5 1.5 | 
| | THE LAST DIMENSION OF B BY THE @ SCAN OF THE VECTOR f 4 0.8 4.8 ++ #\3 3919 | 
| | IN B. | 7 0.875 7.875 | 
| | B SCALAR: THE RESULT IS THE SCALAR B. B MUST BE IN THE DOMAIN | 1 <+ a\i | 
| | OF @®. | | 
|--------- | --------- ~~ -- nn nn ee en ee ee ee ee ee | ----- 2 - ee ee ne ee ee | 
| @\CK]B | LIKE @\ BUT VECTORS ON THE K TH DIMENSION } 1 2 3 | 
| | ARE SCANNED. | 0.25 0.4 0.5 +> #\[1]3 3919 | 
| | 1 4.75 3.2 4.5 | 
| ----~----- | er re en nn nn nn ne er er eee ee renner | enn ee nn rr ee ee re eee ne | 
| @\B | @B ++ @\[1]B {} 1 2 3 | 
| | SCAN ON THE FIRST DIMENSION. | 0.25 0.4 0.5 ++ #43 3919 | 
| } 41.75 3.2 4.5 | 
|--------- | mn ne nnn nn a nn ne nn nn nn en ern ne | ea ne en ee en ee ee eee nee | 
| @XCKIB | @x(KIB «+0\(1+(poB)-KXIB [i PAOyS, tas | 
| | SCAN ON THE K TH FROM LAST DIMENSION. 1 4 0.8 4.8 +> #4(1]3 3p19 | 
| | |} 7 0.875 7.875 | 


2 «+ 12 3+.x4 5 6 
++ 10 i1VvV.,AL 1 0 


ELEMENTS OF THE RESULT ARE FORMED BY TAKING CONFORMING VECTORS | | 
| 
«+ (2 3916)-.f3 49112 | 
| 


| 3 
| ON THE LAST DIMENSION OF A AND THE FIRST DIMENSION OF B APPLYING| 1 
| | @ BETWEEN THEM AND REDUCING THE RESULT BY @. M1+.xM2 IS THE 1567 
| 8 8 


8 

| LINEAR ALGEBRA MATRIX PRODUCT FOR MATRICES M1 AND M2. | 8 8 
ieketeaiatetateieteteietate | een ee enn an | en nn nn nn ne nn nn ne rn nn rn ee rn ne rn | ee rr rr rr re enn eee e nr nnne| 
OUTER PRODUCT| A°.@B | THE RESULT IS THE OPERATOR @ APPLIED BETWEEN ALL | 4h 5 | 
| | PAIRS OF ELEMENTS SELECTED FROM A AND B. THE RESULT HAS | 8 10 ++ 1 2 3o.x4 5 | 
| SHAPE (94),0B. | 2 15 
| | | 
| | 


| 
| 1 
| 1 ++ 0 1°,Vv0 1 


| 
@ AND ® ARE ANY DYADIC SCALAR PRIMITIVE FUNCTIONS. - | 
K IS A DIMENSION NUMBER OF B. | 

| 


np > CEP cep cup CSE ep cam eae oom cE ae (C8 com «out oD aa CED cue cum ease @Gemm aun cup eset eeep eamep COD comp eee cep em eee ese cep coe camp coenp Comm == ee aoe 


COMPOUND 
OPERATORS 


(CONT. ) 


ny 
S 
ay 
=z 
hg 
Ky 
Kg 
bn 
bay 
wR 
Z| 
o 
zy 
a 
na 
Ss 
ho 
hy 
= 
& 
S 
Ky 
CQ 
ry 
QS 
= 
>) 
Kg 
hy 
So 
ay 
17») 


THE RESULT OF REDUCTION OF AN EMPTY VECTOR IS 
THE IDENTITY( IF If EXISTS) FOR THE FUNCTION. 
REDUCTION OF A DIMENSION OF LENGTH ZERO WILL 
PRODUCE AN ARRAY CONTAINING THE IDENTITY FOR 
THE FUNCTION. INNER PRODUCT AND BASE VALUE ARE 
DEFINED IN TERMS OF REDUCTION AND CAN CREATE 
ARRAYS CONTAINING THE IDENTITY. THE IDENTITIES 
POR THE SCALAR DYADIC FUNCTIONS ARE LISTED 
BELOW ALONG WITH WHETHER THE IDENTITY IS A 
LEFT IDENTITY, RIGHT IDENTITY, OR TWO-SIDED 
IDENTITY. 


e | IDENTITY | LEFT, RIGHT, OR BOTH | 
seaaelesssesaessssessese2s | seerassezecesessesseses | 
+ | 0 | BOTH | 
- | 0 | RIGHT? | 
x | 1 | BOTH | 
+ | 1 RIGHT 
x | 1 | RIGHT | 
e | NONE | | 
F | ~4.31359146674F68 | BOTH | 
L | 4&.31359146674F68 | BOTH | 
; | 0 | LEFT | 
| 1 | LEFT? | 
oe | NONE | | 
aA {| | 1 | BOTH | 
vo 0 | BOTH 
nw | NONE | | 
~~ | NONE | | 
< | 0 | LEFT? 
s | 1 | LEFT | 
= | 1 | BOTH | 
> | 1 | RIGHT? | 
> | 0 | RIGAT | 
z= | 0 | BOTH | 
| 
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FORMAT FUNCTIONS. 


Formatted character data structures can be produced using the format 
primitive functions. The monadic form provides a default format. 

The dyadic forms permit explicit specification of the desired format. 
The discussion common to all forms or comparing forms is contained 
here; detailed differences are described on subsequent pages. 


Forms: 
y E Default format 
Van Numeric explicit format 
CYrYeE Character explicit format 
Cc ¥(L) Character explicit formatted list 
Where: E is a data object of numeric or character type 
N is a numeric data object 
vV is a numeric vector defining the edit format 
C is a character string defining the edit format 
L is a list of APL data objects, separated by 
semicolons; each object is of type character or 
numeric. 
Actions/Results: 
The result is a character data object that represents 
the data objects(s) of the right argument, formatted as 
specified. 
Shape: The default and numeric explicit forms preserve all 


dimensions except the last dimension and expand it if E 
is numeric. E may be a vector, matrix or general 
array. 


Bach character explicit form accepts as arguments only 
scalar, vector, or array data objects and results in a 
character matrix having at least one row, and gen- 
erally the maximum number of rows of any matrix in 

the list. 


Conditions/Options: 


All formatting is constrained by the )WIDTH setting. 


For explicit formatting, the numeric form is more 
efficient where appropriate than the character form. 
The character form however, has many more capabilities. 
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FORMAT SYNTAX DIAGRAMS. 


The syntax of the format functions is displayed using syntax diagrams. 
This method shows the syntax clearly and concisely, including by 
connectivity the allowable constructs: defaults, alternatives, and 
iterations. It is rigorous without being cumbersome. 
The rules for interpreting these diagrams are simple: 

syntactic units are set off by spaces and separated by lines; 


any path traced along a forward direction of the arrows will 
produce a syntactically valid command; 


iteration is achieved by a leftward path; 


limited iteration is shown by a "bridge" covering a number 
indicating the maximum numberof traversals of the bridge; 


a vertical bar is a bidirectional path. 


Format: 
m0 aw a em ee ee ee ee ee ee eee ¥ ---- Data Object ----- +o=-> 
¥ + 
o-- Numeric Format Vector --- ¥ --- Numeric Array -----+e 
+ + 
e- Character Format Vector -- ¥ --0------- Eoercrer--- >o 
¥ + 
o- ( wo- F +0- ) ~--+0 
Where: £ is character or numeric +  ¢ 
data object ot 3 =0 


Numeric Format Vectors: 


--+e-- Width +e- Dec Digits -+0--+> FIXED POINT 
+ + | 
4 O mw am mwa = QO w= >o INTEGER 
+ + | 
+ e- Dec Digits -->0 FLOATING POINT 
+ ¥ 
O we we we me we we wwe ee ee ee we ow ° 
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Character Format Vector: 


ee se eee Clause --<«-+--< > 0 = = -+0 om => 
+ | | + 
+ o---- fF ( Clause ) -----+0 + 
+ + + ¥ 
4 Ofm mm mmm wmamm em © ww mm me mw wm ° + 
+ + 


Where: & is clause replicator 
Clauses: 
meh Om mmm meme enn PhraSe@ ----<-------30--4 
+ + 
Ce i tt ° 
Phrase: 
He PO mm ep Oem we me mw wm ewe oe KG> emer nn we er ere wn wn en we wm ew mw wenn eee 
+ + 
© R Om em mw ew mn wn ww ww ee em ee em wenn >o tO FC wan wenn cnn nen en ene ee >o 
+ S + 
+ Ee ee ee >o 
+ + + 
oe ee PO me ww ww wm wom ->0->0 ° >o W Seed keke ke ee ee ee oe.) 
| + ¥ 4 
o *<S> +e = +0 <G> +0 nnn nnne PO WY em m em mm mm mm mr mm eee ee >o 
| + + + + 4 
° O +0 + te A >o 
| ¥ + ¥ + + + 
o + +0 en +o W320 (PD pew nn wre nnn oe >o 
t + + 
ot /2\ 0te nee -0 O--=->00 >+o W +e .D +0 4 
¥ 4 + ¥ + + + 
Where: S$ is string o [ +o 4+ Om me O mm mm POFO Rm mm me ne oe +0 
| | + + 4 + 
R is replicator o B +e o +0 Wernrn---30 © = +0 <S> +0 
| | | | + 
¢€ is column °o C +0 ° O +0 + 
| | | | + 
Wis width o Z +0 o + +0 } 
+ — + t+ _ + 
Dis dec digits o</3\e ot /2\0t+-n--- ° 
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DEFAULT FORMATTING. 


Default formatting is a monadic mixed primitive function that results in 
a character data structure. 


Form: 
¥E 
Where: E is a data object 
Actions/Results: 
The result is a character data structure. 
If E is of character type, the result is identically E. 
‘ Tf E is of numeric type, the result is formed as follows: 


Every element of E is rounded according to the 
current print precision to get the specified 
number of significant fractional digits (integers 
are not truncated) and trailing fractional zeros 
are ignored and then converted to characters. 


If E is scalar, one blank is prefixed. 


Tf E is vector, the result is also a vector. This 
result is the ravel of an array formed containing 
the character representation of each element. 
Sufficient columns are provided that at least one 
blank precedes each non-blank, and all decimal 
points are aligned. 


If E is an array, the reSult is also an array 
except that the last dimension is expanded in the 
same manner as if the array were raveled. 


Conditions/Options: 


The length of the last dimension of the result is an 
integer multiple of the length of the last dimension of 
Ke 


For some element(s) there will be only one preceding 
blank. Others may have more than one blank. 


Print precision limits the printed numbers. 


Exponential notation is used for all output if any 
element has either an integer part too big to be exactly 
expressed, or only a fractional part and the exponential 
notation would be shorter by 3 or more characters 


than the numeric notation. See 
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Default Formatting Examples: 


¥O 11 2222 3333 O.4444 
0 11 2222 “3333 


WQO 11 2222 3333 O.44ey 
) 
11 
2222 
~ 3333 
O.4444 


¥'APL' 
APL 
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NUMERIC EXPLICIT FORMATTING. 


The numeric explicit format mixed primitive function provides 
efficient formatting of a numeric data object of any rank and 
produces a character data object. 


Form: 
Va¢N 
Where: V is numeric format vector 
N is numeric data object to be formatted 
Actions/Results: 


The numeric data object N is represented as a character 
data object. The shape of the result is the same as N, 
except that the last dimension is determined by the 
format V. 


The format V must be a vector of length 2xM where M is 
a positive integer. Successive pairs of elements from 
U specify how successive columns of N are to be 
formatted. 


If Wis the first and D is the second member of a pair, 
an element on the last dimension of N is formatted as 


follows: 
D> O FW.D 
D= 0 Iw 
D < Q EW.D 


If M is less than the last dimension of N, then the 
format V is cyclically reused. 


Conditions/Options: 


A field width inadequate to allow representation of the 
number is filled with '‘x'. 
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Numeric Vector Formatting Examples: 


10 3¥0 123 0.0125 1234.5678 
0.000 123.000 0.012 1234.568 


10 3¥80 123 0.0125 1234.5678 
0.000 
123.000 
0.012 
~4234.568 


50508 4 12 370 123 0.0125 12345.678 
0 123 0.0125 ~41,235F4 


9 0 8 3¥2 2 29111 112 121 122 211 212 221 222 
111 112.000 
121 122.000 


211 212.000 
221 222.000 


5 05 2¥ 3 5.12 8 27.3456 5<1 3 5.12 827.35 


8 148 53.8 0.0000345 0 12345678 4.0F 15 ~2.5EF° 25 
~5.4F1 
“3.4E 5 
0 
1.227 
4u.OF 15 
~2.5E 25 
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CHARACTER EXPLICIT FORMATTING. 


The character explicit format dyadic mixed primitive function provides 
the most general formatting capability. 


Forms: 
CyE Character explicit format 
C y(L) Character explicit formatted list 
Where: C is a character string specifying the format. 


E is a data object of rank at most 2. 
L is a list of data objects separated by semicolons. 


There is no type or shape conformability requirement between list 
members. 


 Actions/Results: 


The result is a character data matrix, that represents 
the right arguments according to the format 
specification. 


The method is to create a character structure of 
appropriate shape filled with blanks. Then, into 
appropriate positions non-blank characters are inserted 
according to the format string as applied to 
corresponding portions of the right argument. 


The number of rows in the result is the maximum of the 
number of rows in matrices that comprise the right 
argument. If only scalars or vectors appear in the 
right argument, then a matrix with one row results. 


Conditions/Options: 
The maximum rank of any data object in L is 2. 
Separate formatting for each row of output takes place. 


The fields in the result for any matrices with less 
rows than the maximum, are displayed with blanks. 


Character Format Syntax Chart: 


The format character string f has many options. It should conform to 
the following syntax. The leftmost entry is the syntactic unit being 
defined in terms of one of the alternatives, if any, to the right of 
VS Upper or lower case letters in this type font represent 
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syntactic units further defined. 
font represent themselves. ‘text’ represents 
are ignored except within "text!, 
integers are used for r, M, W and D. 


Letters or characters in the APL 
any APL text. 
Character representations of 


Blanks 


f is s or S}S? « « « 3S format 
S 18 g OF G,sGy « « « -G OF empty segment 
g is c or ric) group 
r is optional clause replicator, replicator 
default is infinite 
¢ 1S p OF pyPy «©. « « *P clause 
p is one of: phrase 
MJAW character object formatting 
M JE W.D floating point numeric formatting 
MLQFW.DR fixed point numeric formatting 
MLQIWR integer numeric formatting 
MXW skip W characters forward 
MTN tab to N characters from start of format; 
(may be used to back up for replacement) 
<text> literal text for each row; 
may not contain the '>' character 
Mis optional phrase replicator phrase replicator 
default is 1 
W is optional total field width field width 
default is 1 
D is optional number of places to right decimal places 
of decimal point, default is 0 
L is B or C or B C or _ empty left decorator 
B is *<text> background for field 
R is C or _ empty right decorator 
C is S<text> or S<text> S<text> conditional text 
or S<text> S<text> S<text> 
S is one or more of: sign selector 
- insert ‘text’ in field if negative Sign selectors 
fe) insert ‘text’ in field if zero 
+ insert ‘text' in field if positive 
J is £L or empty, default is right justifier left 


justify in field 
zero or more of: 


left justify in field 
skip if zero 

insert commas 

leading zero insert 


NQWS 


columns to right of start of format 
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Character Format Semantics: 


The prior syntax chart provides named syntactic elements for semantic 
description only. The terminal forms (shown in APL font) are the same 
as in the syntax diagram. 


Any data object that provides a part of the right argument is 
generally the result returned from evaluation of an APL expression. 
In the following discussion, the general case is that a data object is 
treated as a matrix. A vector or scalar is treated as a matrix with 
only one row. 


The form using a parenthesized list containing data objects separated 
by semicolons imposes no conformability or type restriction on 
adjacent data list members. The formatted result will have as many 
rows as there are in the data object having the most rows. The 
corresponding fields for objects with less fields will be blank. Each 
semicolon represents a synchronizing point with a semicolon in the 
corresponding format. 


Each format segment applies in order to the corresponding data list 
member. The format segments are cyclically reused if necessary, 
until the entire data list has been formatted. If the format segment 
is empty, default formatting is used to format that data object. 


Each format group applies in order to the corresponding columns of any 
one data list member. The format group is cyclically reused if 
necessary, until all columns of the data list member are formatted. 


Within the format group an integer clause replicator can be used to 
limit replication. Without the replicator the clause is assumed to 
replicate cyclically as often as necessary. 


A format clause is a series of phrases separated by commas. 


Each phrase specifies the field width, and the content for that field 
resulting from either conversion of a data object or a literal text. 


A The character object formatting phrase permits expansion between 
the columns of the object if Wis greater than 1. It also permits 
choice of left or right justification. 


E The floating point numeric formatting phrase provides results in 
scientific notation: mantissa E exponent, e.g., -3.2F 2 or 9.73F21. 


Default columns for non-negative signs are elided. This format can be 
explicitly justified left, or right by default. 


F The fixed point numeric formatting phrase provides fixed, aligned 
format with a specified number of decimal places. This phrase permits 
qualifiers and left or right decorators. 


I The integer numeric formatting phrase provides integer results with 
qualifiers and left or right decorators. 
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Any numeric formatting phrase for which the field width is too small 
gives '«' for the entire field in the row in which the data element 
was out of range. 


xX The skip formatting phrase provides rightward skip over the 
indicated number of columns. The replicator is not needed. Instead, 
usina the default replicator of 1, the width can be the product of 
replicator times width. The columns are skipped, not blanked, to 
allow any prior content to remain. 


T The tab formatting phrase allows absolute repositioning to any 
result column starting from the leftmost as column 0. Any subsequent 
formatting phrase will overwrite any prior contents. 


A <text> phrase allows the indicated text to be unconditionally 
included in every row of the result. The text cannot contain the 
character. 


R The integer phrase replicator specifies the number of uses of the 
phrase before moving to the next phrase in the clause. 


W The total field width for character or numeric phrase formatting 
should include sufficient columns for the entire anticipated result 
range of values including signs and decorations. 


D The decimal places for fixed point and floating point numeric 
formatting permit specified precision result display. Rounding occurs 
as part of formatting. 


Left and/or Right Decorators can be applied to fixed point or integer 
formatting. 

- 0 + The sign selectors alter the result depending on the signum of 
each individual data element. These prefixes to explicit text can be 
applied separately, or in pairs. In any one formatting phrase, only 
one occurrence of each sign selector should occur on each side. The 
same sign selector may appear in the left and right decorators. A ‘=! 
selector removes the Sign from any negative element. 


*<text> A field background can be specified. It is initally inserted 
in the field, then partially replaced. 


LZ The default justification of phrases that do not require the 
specified width is to the right. Unless background is’ specified, 
excess columns to the left are blanked. Left justification can be 
explicitly specified instead, in which case excess columns to the 
right are blanked. 


UZ BC Z Qualifiers alter the field content for integer and fixed 
point formatting. They include left justification; skipping (the 
numeric result and decimal point) if the element value is’ zero; 
insertion of leading zeros to fill the field; and insertion of commas 
to set off positive powers of 1000 for large numeric results. 
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Numeric data objects 


O+WV+ 1230 4.55 0 0.465 60.525 
“4230 4.55 0 80.465 60.525 


[+WM+' 0.05 25°.x410 1 0.025 
~2.050F1 ~5.000F 2 1.250F 3 
1.025F4 2.500F1 6.250F 1 


Floating Point 


_ '"F10.2'¥WV _ _ 
1.2323 u.55F0 0 4.65F 1 


'HO.4,E6.0,710.2'¥NM 
1.025024 3.1 6.25#F 1 


'F6E.1'¥ 0.12 0.12 


KKKKKkRKEKRKKKEK 


_ 'ET.1'¥ 0.12 0.12 
1.2F 1 1.2F 1 


Fixed Point 


'F10.2'FQNV 
~ 1230.00 
4.55 
0.00 
"0.47 
60.53 


'F10.2' NV 
“1230.00 4.55 0.00 0.4760.53 


_ '"F7.2,F6.1,F8.4u'¢WM 
20.50 0.0 0.0013 
kKkkKkKKK 25.0 0.6250 


Integer 


'T6' NV 
“1230 5 O ) 61 


'T5,fl2'¥NM 
“O46 ) 
1025025 1 
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Phrase Replicator 
'273,275,372'F¥ 12345678 9 
1 2 3 4 567 #8 9Q 
Justify Left 
'TIT5"'¥Q 1 2 34 567 
“a 
2 
34 
567 


Background 


te<o>T5'¥ 10 2 


000 1oecceo0f00002 


te</ \>I5'¥1 23 456 
/ \/1/ \23/ 456 


Sign Selectors 


"$<P>O<Z>-<N>I5'¥ 10 2 


M1 20 P2 
™+O< >-<(>I5+0< >-<)>' FH 1 0 2 
(1) 
0 
2 
'4< >O< >LI12'¥& 1 32 0 541 
ie 
32 
) 
544 
~35 


Blank Zero Field 


_ Hise 1.0.5 
1 5 


'BLI5'*¥e 10 5 
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Comma Insert 


'CT10'¥1234567 
1,234,567 
'"CFP12.4'¥1234.5678 
1,234.5678 


zero Insert Left 


'ZI3'¥Q1 23 456 
001 
023 
456 


Combined 


'x<o>ZBI5'¥Q1 23 456 0 987 
00001 
00023 
~ 0456 
00000 


00987 


"'ZBCI7'¥1 0 2345 ~ 4 
000,001 002,345 00,001 


'BCI5'#® 10 234 5678 
“4 


234 
5,678 
Character 


"A2'¥2 Up'GOODWORK' 


G OO D 
WORK 
"A1,A2,A3,AU'B'OPEN' 
OP E N 
"LA2Q'e' LEFT! 
LEFT 
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Tab and Skip 


'T15,70,15,X20,75'825 50 75 


50 25 75 
"775.7042754125"°8285 50.75 
50 75 
Text 


t<|>,75,<]o>'¥a1 10 25 


| 1 |e 
| 10|° 
| ~25]o 
Combined 
"T53X4,2A1'¥(5 6;'AB') 
5 6 AB 
"T53X4,A2'E(1003Q'AB' ) 
100 A 
100 B 
"T53X4,A1'F(,1003Q'AB' ) 
100 A 
B 
'"T53sA53F5.1'F(Q1 10 1003;Q'FINE'32 391.1x1 2 3 4 5 6) 
1 F 1,1 2.2 3.3 
10 I 4,4 5.5 6.6 
100 N 
E 


'£75,2(L13.F7.2,X4),23'F3 5 15.72 17 23.15 3 
3 5 15.72 17 23.15 ~ 3 
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FUNCTION DEFINITION AND EDITING. 


Table 4-1 summarizes the function definition, opening, and closing 
commands and the full set of function editing commands. The defini- 
tion of a function is started by typing the del ( Vv ) symbol, which 
initiates entry into the function definition mode from the calculator 
mode, (Entry of the del symbol to initiate the definition mode may 
only be done while in the calculator mode. ) The del symbol is then 
followed by the function specification header, which consists of two 
parts: (1) the function template, and (2) the local names (variables) 
list. 


The function template may be entered in six different forms, depend-= 
ing on whether the function does or does not return a result and 
whether the function is niladic (no arguments), monadic (one argu-= 
ment), or dyadic (two arguments). The six forms of templates are as 
follows: 


NILADIC MONADIC DYADIC 
RETURNS RESULT | R+F | R+F B | R«A F B | 
wen eeneenn---- | --------------|--------------| 
NO RESULT | E | FB | AF B 


Where: 


R is a dummy variable whose value is used as the 
value of the function when the function execution 
is completed. 


Bis a dummy variable that is initialized to the 
value of the right argument when execution of the 
function is started. 

A is a dummy variable that is initialized to the 
value of the left argument when execution of the 
function is initiated. 


F is the function name. 


R, B, and A must be distinct names. 


Table 4-1 


Function Definition and Editing 


| 
TEXT OF A BECOMES THE ‘MOST RECENT APL | 
EXPRESSION‘ AVAILABLE FOR EDIT. | 

| 


| BRESSAASSSASASSARSSSSSSSSSSSSSSSSTSSSSSE ST SSsssssssr ss sess ssssssssssssssrssssassssessssessssesssessseses | 
| | ACTION | | WEXT 
| COMMAND | SYMBOL | FORM | ACTION | PROMPT? 
Jassusseseezszanssess | Sssseesa2 | + — | pn — 2) | asasaenac-casa 
| DEFINE | V | Vz | DEFINE NEW FUNCTION, HEAD OF WHICH IS | [1] 
| | | | Hs; INITIATE EDITING THEREON. | 
| momen nnn cennne- wcce | none en--- | ene ene eee ee eee eee | mee ern nn nn nn nn en nn een eene |-------- 
| OPEN | Vv | VE | INITIATE EDITING OF PREVIOUSLY DEFINED | [(2] 
| | | | FUNCTION, F. | 
| OPEN (LOCKED) | 9 | FP | | 
| ene meen nn ne nn nn enne | mone renne | -- 2 -- ene eee | mmm er me mmm men en ene e nnn eeceecee | 
| CLOSE | Vv lv | TERMINATE FUNCTION EDITING. | 
| | | | (MAY FOLLOW ANY COMMAND EXCEPT EDIT) | 
| CLOSE (LOCKED) | * | * | | 
|sacsaseeseeeessesses |ezssesees | esesesessssessseese | seeesesessessesssssesssssessesesssessses|ssseeees 
| REPLACE | | CA]2 | TEXT OF LINE A IS REPLACED BY Tf. | (2) 
| | | | (IF 4 = Z, SAME AS APPEND-AFTER) | 
| eee en meee nnn ee n--- | --------- | eee eee rene eee - ee | pe en nn nn nn nn nn een ene cnen- | 
| APPEND-BEFORE | + | (+12 | TEXT OF NEW FIRST LINE IS f. | 
 etetetetetetatetatetetetetatatetetate | --------- | en 2 ee ee ee ee eee ee | a en ne en nn en nen e nn: onnee | 
| APPEND-AFTER | + | C+I2 | TEXT OF NEW LAST LINE IS f. | 
| ene ene n en ee ne ene e-- | --------- | eee enone ------ | een me nn meen nn er ene nner cennn- | ---ennn- 
| INSERT-BEFORE | 4 | C+AaIL2 | TEXT OF NEW LINE, TO BE INSERTED | C+4+1] 
| | | | BEFORE LINE A, IS Tf. | 
| enn nn enn n nee nnn ---- | --------- | --- ene en een en eee | mee rn nr rn ern nen nen e re nene | ee wrennne 
| INSERT-AFTER | + | C+4lz | TEXT OF NEW LINE, TO BE INSERTED | C+4+1] 
| | | | AFTER LINE A, IS f. | 
Jzessecsessreseesenrs|sssessees | SSseeresrsectssssas | sestessstsssssessssrsessssssessessesseses|sse2e2e2 
| FPULL-EDIT | E | CeAl | INITIATE EDIT OF LINE A. RULES SAME AS | (2) 
| | | | FOR TRANSACTION EDIT. | 
Solleteedatataketetetaeteietatatate | m2 neenn- | - 22-2 ee nee nee eee | em te rene nm nme nee serene cecnce | 
| PREFIX-EDIT | a | Cad] | SIMILAR TO FULL-EDIT EXCEPT SINGLE | 
| | | | INSERTION BEFORE TEXT OF LINE A IS | 
| | | | ASSUMED. l 
aa a ala la le | -e--en-ee | en en rene ee nen een --- | ene ce cen meme en mmm nnn m ener mene e nen aeae | 
| DIRECT-PREFIX | a | CaAl2 | THE TEXT T IS INSERTED BEFORE THE | 
| | | ° | TEXT OF LINE A. | 
 Ketetetnetetetatatatedatatetedatatatater | -----e---- | ene ne en ene nn | meee em nnn nnn n ene neem nee n enn | 
| SUFFIX-EDIT | Ww | CwAl | SIMILAR TO FULL-EDIT EXCEPT SINGLE | 
| | | | INSERTION AFTER TEXT OF LINE A IS | 
| | | | ASSUMED. | 
| ene ener ene nnn een ne |--------- | ----- eee ----e----- | mn er er wn een ne nnn eee nn ene- | 
| DIRECT-SUFFIX | w | CwAIZ | THE TEXT T IS INSERTED AFTER THE | 
| | | | TEXT OF LINE A | 
| waren e wwe nese ene | ---------  eteetetedataetetatetetatatatetatatetete Feil ini a ed anc che cs alain will ace a ee ee 
| IMMEDIATE-EDIT | ’ | C14] | UPON TERMINATION OF DEFINITION MODE, 

| | | 

| | | 

| | | 


Table 4-1 (cont) 


Function Definition and Editing 


| | DELETE THE D SELECTED LINES WITHIN | [2Z-D) 
| | RANGE R (DELETE ON LINE ZERO DELETES | 
| | 


LOCAL NAMES LIST). | 
Sasssesessssessssss{sessseseefe a| See secesceseeseeasssseressessse-secese= | Sse =e= 


THE FUNCTION IS EXECUTED. 


DISPLAY-LINES | 0 | | FORM OF DISPLAY: ron ZS! 
| | UNQUALIFIED: | HEAD - VH H = HEAD OF FUNCTION | 
| | SELECTS EVERY | BoDY - {N] 7 N = LINE NUMBER | 
| | LINE WITHIN THE | TAIL - Vv f=: TINE: TEXT | 

were ------------- |---------|]- INCLUSIVE RANGE -|-------- eco coe nee re nr een en eee | 

DISPLAY-TEXT | q | R. | FORM OF DISPLAY: | 
| | | HFAD - VH H = HEAD OF FUNCTION | 
| | FORM | RANGE | BODY - . f = LINE TEXT | 
| | -------- |-------- |. TATE = Vv | 

wor ere nee ----- |---------|-[0] | o-y oll cteeteeetoatediateatiedietatectateteteteteatetatantetatatatiatetatatatattatatatetatetatel 

DISPLAY-CONTROLS | a | [0A] | A | FORM OF DISPLAY: | 
| | [40] | A-Y¥ | HEAD - VC P C = CONTROLS SET 
| | [AOB] | A-B | BoDY - [NJ CP tT - TRACE | 
| | | TAIL - Vv [ - STOP | 
| | QUALIFIED: | n - STATISTICS | 
| | SELECTS ONLY P = PROCESSOR UNITS | 

------------------- |---------|- LINES WITHIN THE-|------------ ee on nn ren nn eee | 

DISPLAY-NUMBERS | ? | INCLUSIVE RANGE | FORM OF DISPLAY: VECTOR OF NUMBERS | 

Beeseaesesssssessses |[eeesseese{= R WHICH CONTAIN s|eersssestessteerssssesseessssscssessseces|eseesces 

SET-TRACE | T | NAME X. | FORM OF DISPLAY (DURING EXECUTION): | (2) 
| | | FCMNIK(S)YV F = FUNCTION NAME | 

CLEAR-TRACE | i | FORM | RANGE | N = LINE NUMBER | 
| | -------- | -------- | LINE [0] TRACES K = TYPE OF VALUE | 
| | £(oxX)] | o-y¥ | FUNCTION RETURN. N - NUMERICAL | 
| | C(COX)A] | A | B - BOOLEAN | 
| | C[A(oxX)] | A-Y | C - CHARACTER | 
| | CA(OX)B]] A-B | S = SHAPE OF VALUE | 
: | | V = VALUE | 

wer err nn een eee | ---- -- --- | - 2 | peer en ee er rr rr rr rr eee | 

SET-STOP | [ | Oo = ACTION SYMBOL | FORM OF DISPLAY (DURING EXECUTION): | 
| | | F(N]* F = FUNCTION NAME | 

CLEAR-STOP | L | 4,B = ADDRESS(LINE| N = LINE NUMBER | 
| NUMBER , | LINE [0] STOPS | 
| | LABEL OR | BEFORE RETURN. | 

woe ee ------------- |---------|- LABEL + - | -------------- --- 2 ee ee = | 

SET-MONITOR | n | INTEGER. | INITIATE COLLECTION OF STATISTICS. | 
| | | | 

CLEAR-MONITOR | U | | LINE [0] COUNTS THE NUMBER OF TIMES | 
| | | | 
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The local names (variables) list is separated from the function tem- 
plate by a semicolon (;) and consists of a distinct set of names 
themselves separated by semicolons. System variables may be included 
in the local names list. Local names have meanings only while the 
function is active; that is, while the function is being executed. 

As soon as the execution of a function is terminated, the meaning of 
ali local names disappears. The dummy variables for the result and 
argument(s) must be distinct from all other local names. The function 
specification is considered line O of the function, although not 
identified as such in the display. 


After the user types the function specification and enters it by use 
of the carriage-return function, the system responds by typing the 
identifier for line 1 [ 1 | and indents five spaces to prompt the 
user to enter the first line of the function. <A user entry at this 
point is interpreted as the definition of line 1 of the function/ 
program. After the first line is successfully entered by a carriage- 
return function, the next prompt is : 2 ee This operation is re- 
peated for each subsequent line to be entered, 


Definition editing commands (table 4~1) may be entered any time the 


function definition is open (immediately after a prompt). The 
function is terminated (closed) after all lines are completed by 
typing another del (Vv De either at the end of the last line entered 


or after the last prompt is returned. If the del is entered at the 
end of an entry, it is not considered part of that entry. 


Entries to a function may contain a label. The syntax of a function 
entry is: 


FE is Ls Function Entry 
LS is ID:LS or $ Labeled Statement 


Wheres ID is a string starting with a letter, under- 
scored letter, del, underscored del, and is 
followed by any number of additional letters 
or underscored letters, numbers, dels, under- 
scored dels, or underscores (_). 


S is an expression or comment. 
DEFINED FUNCTION EXECUTION. 


The execution of a function begins when the function is first called, 
either from the calculator mode or from another function. From the 
instant execution of a function begins until the execution of the 
function is completed, the function is active. An active function 
may be suspended or pendant. A pendant function is one which is 
awaiting completion of a function it called. <A suspended function 
in one which is currently executing or one whose execution was 
stopped for some reason other than a call to another function, 


Mam Ly 


Execution of a function may be halted abnormally by an error, a stop 
on a line, or when the user presses the attention Key. 


The command ')SI is used to display the state indicator. The state 
indicator is a list of all suspended and pendant functions. The 
display of the state indicator has the following form: tFIN]'; where 
F is the function name and N is the line on which the function is 
suspended or pendant. If the function is suspended a star ( * ) will 
appear in the state indicator display; for example, trl 6 | *' indicates 
F is suspended on line 6. 


While execution of a function is suspended, the user may examine and 
modify the contents of local variables, modify the suspended function, 
continue execution, or abort execution of the suspended function. A 
pendant function cannot be modified. No local names may be added or 
deleted from a suspended function. To continue execution of the suse 
pended function, the user types '—>N', where N is the line in the 
function on which execution is to be continued. N is usually the 

line on which execution was stopped, but need not be. To abort execu- 
tion of a function the user types '—%>'. The system responds by 
typing the name and line number of the next suspended function in the 
state indicator. If no more functions are suspended, no response is 
given to the abort. 

It is good practice to eliminate all suspensions soon after they 
occur, as suspended and pendant functions take up space in the work- 
space. The user should avoid executing a function from the beginning 
after execution is stopped. If it is impossible to continue execution 
of a function after it is stopped the abort should be entered before 
execution of the function is begun again. 


EXECUTION CONTROL. 


The normal flow of execution of the lines in a defined function is 
sequential; that is the execution starts with line 1 and then pro- 
ceeds to line 2 when line 1 is completed, and, so forth. This 
sequence may be altered by two user-implemented functions: branching 
and aborting. 


One way of altering the normal flow of defined function execution is 
by use of the branch primitive operator in the following forms: 


— V 
Wheres V is any scalar or vector-valued expression. 


There are many situations in which it is desirable to branch to some 
other line of a defined function other than the next one in sequence, 
For example, after a particular sequence of lines has been executed, 
it might be desirable to repeat them with a different set of values, 
It may also be desirable to repeat just one line, or all lines 
starting with a particular line. 


The branch primitive shown above produces no result other than alter- 
ing the sequence of execution. The branch operation may appear only 

at a point where no value is needed; that is, as the left-most func- 

tion on a line, or the left-most function ina string to be evaluated 
where no result is required. The next line to be executed is the one 
specified by the scalar value or the first element of the vector. 

If there is no such line in the function, then execution of the 


function is terminated and control is reestablished at the point 
where the function was called. If the specified vector has no first 
element, then control passes to the next line. Because function 
editing may cause line numbers to change, labels may be used to 
prevent the necessity of changing branches every time a line is added 
or deleted. A label is any valid identifier which prefixes a line 
and is separated from the statement by a colon(':'). A label is con- 
sidered to be a local constant having the value of the line number it 
appears on. The name of a label must be distinct from all other 
local names. 


A branch entered while the system is in the calculator mode causes 
execution of the last suspended function to be continued at the line 


specified. 


The formats for the various methods of branching are as follows: 


+L GO TO [£ 

>(C)/L IF ¢ THEN GO TO | 

+(1+x£)6L1,£2,23 BRANCH OW SIGN OF E(- £1, 0 £2, + £3) , 
+(£1,22,23,...)€H] GO TO ZW 

+N+1I26 BRANCH W LINES FORWARD( BACKWARD IF W<0) 
+0 RETURN 

Where: 


ZL. £1, £2,... ARE LABELS OR LINE NUMBERS. 

€ IS A BOOLEAN EXPRESSION OR CONDITION. 

E IS ANY SCALAR VALUED EXPRESSION. 

N IS A SCALAR INTEGER VARIABLE OR CONSTANT. 


It is also possible to abort execution of all functions up to and 
including the calculator mode entry that initiated the first function 
call leading to the suspension, The abort primitive entry from is 
the right arrow (—>). 


The abort function produces no result, but aborts the execution of 
all functions up to and including the calculator mode entry which 
initiated the first function call leading to the current suspension, 
Abort may be executed in calculator mode or as part of a function, 
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SECTION 5 


SYSTEM COMMANDS 


GENERAL. 


APL/700 has a set of special instructions called system commands. 
These commands concern such practical matters as signing onto and off 
of the system, Saving workspaces, setting default control values, 
copying workspaces, functions, or variables, and controlling terminal 
functions. These operations are only initiated in calculator mode; 
they can not appear as part of auser defined function. A system 
command is executed immediately after being entered (if possible). 


SYSTEM COMMAND FORMAT. 
The conventions used to describe the system commands are chosen to 


allow ready recognition of the fixed and variable, necessary and 
optional parts. 


Representation Meaning 
System command prefix 
[] () JF Separators -- matching pairs for [ ] and ( ) 
COMMAND Upper-case is required literal word 
Variable Initial Capitals 
Variable Underscore is optional variable name, 
n Number 
n optional number 


The optional phrases or numbers change the meaning of the basic 
command. A command without an optional part is often an inguiry. The 
optional part provides a value or name for more detailed 
specification. 


SYSTEM COMMAND CATEGORIES. 
The system commands are grouped under the following categories: 


Session Controls 
Terminal Controls 

Clear Workspace Controls 
Library Controls 

Name Displays 

Run State 

Group Commands 


)BLOT ° obscure area 


Blot provides multiple overprinting of an 18 character area, then 
backspaces to the prompt position to obscure subSequent display of a 
sensitive entry such as the Password on the account. 


TERMINAL CONTROLS. 


An account can be used from any terminal. The line width and tab 
setting must be specified. 


)WIDTH n maximum characters in display line. 


The number of characters n is in the inclusive range 30 to 130. Ifn 


is not specified, the result is the current width. 


WIDTH 65 
WAS 120 

\WIDTH 
Is 65 


)TABS n physical tab interval 


The integer n is the number of characters between physical tab 
settings. This single interval should match the tabs as actually set 
on the terminal. If n is not 0, then output with "white space" will 
automatically use tabs to Minimize the time to reach a position on the 
display. 


)CLEAR 
)SYMS 


CLEAR WORKSPACE CONTROLS. )ORIGIN 


Workspace controls provide the default SYMS, ORIGIN, DIGITS, SEED, and 
FUZZ for a clear workspace that is suited to the normal desires of the 
account user. 


) CLEAR n clears workspace 


The clear command without n destroys the prior active workspace and 
replaces it with a clear workspace having no names in it and the 
default attributes hereafter described. If nis specified, it refers 
to the number of symbols reserved for the symbol table. This number 
may be in the incluSive range 16 to 1024. 


)CLEAR 
CLEAR WS 

Y)CLEAR 300 
WAS 256 


The response indicates the number of symbols in the prior active 
workspace. It does not change the default number, which is controlled 
by )SYMS. 


The following commands return current values or allow the establishing 
of new default values for clear workspace attributes. The examples 
illustrate the installation provided default values and samples of 
changes to them. 


)SYMS n default symbol table size 


The default symbol table size for a clear workspace is set ton, in 
the inclusive range 16 through 1024, Since the space consumed in the 
workspace 1S 6 bytes per entry in the symbol table it should be 
controlled in space limited applications. 


)SYMS 
1o- 256 

)SYMS 400 
WAS 256 


)ORIGIN n default ordinal index origin 


Origin affects primitive functions that use ordinal numbering. The 
cefault index origin can be overridden by the index origin system 
function {[0. 


YORIGIN 
Is 2 
JORIGIN oO 
WAS 1 5-3 


)DIGITS 


) SEED 
)FUZZ 


)DIGITS n default print precision 


The default number of significant digits displayed in either 
fractional or exponential form is established in a clear workspace by 
the value of n. This must be an integer from 1 through 12 inclusive. 
The default digits can be overridden by the system function [DPP, print 
precision. 


)DIGITS 
IS 10 

)DIGITS 4 
WAS 10 


) SEED n default random number seed 


The quasi random number generator used in the roll and deal primitive 
function is pre-set to the default value of Seed. This permits 
repeated execution to receive the same supplied random values of an 
algorithm if desired. The value of n iS a non-negative integer: 0 
through 549755813887 (the largest integer). The seed is the starting 
value for the random link. The random link changes with each use of 
roll or deal and can be changed by the system function ORL , random 
link. 


)SEED 
Is 0 

)SEED 377 
WAS 0O 


)FUZZ n default comparison tolerance 


The comparison tolerance by which two approximate representations of a 
number are considered equal is established in a clear workspace by 
)FUZZ n. The allowable range for n is 0 through 1. The default fuzz 


may be overridden by the system function [CT comparison tolerance. 


See that description for details. 


)FUZZ 
IS 1E 10 

)FUZZ 1F 1 
WAS 1F 10 


eer 


)ON 
)COFF 
)OFF 


SESSION CONTROLS. 


Session controls are used to initiate and terminate a work session. 


owe 


)ON Accountname [Password] Signs on account 
)COFF [Oldpassword/Newpassword ] Signs off to continue 
)OFF [Oldpassword/Newpassword] Signs off 


JON logs the account on the APL/700 system and initiates work. If any 
continuation workspace exists, it is reactivated at the point at which 
it was interrupted. 


)COFF logs the account off, retaining the active workspace for 
reactivation at next )ON for that account. 


)OFF logs the account off and discards the active workspace, so at 
next )ON for that account, the user will have a clear workspace. 


Both )OFF and )COFF return date andtime, then the amount of CPU 
(processor) time and elapsed time used. These amounts are given both 
for the session and cumulative for the installation accounting period. 
Units are hours, minutes, and seconds. 


The Accountname is asSigned by the installation. It is considered to 
be public knowledge. 


The optional Password permits a user to protect his own account from 


unauthorized use. The Password can be initially set by the 
installation, or by the uSer at any sign off. Once set, a Password 
must be used for any successful Sign-on. Until removed either 
Oldpassword or Newpassword may be empty. The forms for adjusting the 
password at signoff are: 
[/Newpassword] establishes password 
[Oldpassword/Newpassword] changes password 
[Oldpassword/] removes password 


An Accountname may have 1 to 6 characters; a Password 1 to 12. These 
characters are alphanumeric (excluding the APL underscore alphabet). 


JON BUR103 

)COFFL/SESAME ] 

JON BUR103[L SESAME] 

JOFF BUR103 [SESAME/AL23814] 
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) LOAD Workspacename load copy of workspace 


A copy of the specified workspace becomes the active workspace. The 
Wsid of the loaded workspace (not the Account or Password) becomes the 
name of the active workspace. 


)LOAD TEXTEDIT 
)LOAD MYWORKLMYLOCK] 
)LOAD (LIB) NEWS 


) COPY Workspacename Namelist replace copy 


Copy into the present active workspace from the library workspace 
identified by Workspacename. If Namelist is present, copy only the 
names init that are present in that workspace. If Namelist is 
absent, copy all functions, variables and groups in the workspace. A 
copied object will replace a prior object of the same name in the 
active workspace. 


) COPY TEXTEDIT 
) COPY NEW CVERSION] FORECAST SCHEDULE 


) PCOPY workspacename Namelist protect copy 
Same as )COPY except that any name in Namelist already existing in the 
active workspace will not be copied. 
)PCOPY (LIB)NEWS SCHEDULE INDEX 


)COPY and )PCOPY are more expensive commands than ) LOAD. 


)SAVE Wsid [Password] save workspace 


A copy of the active workspace can be saved in the account library of 
the user. If Wsid is present, that name is the one used for 
Subsequent library reference; if absent, the prior active workspace 
identifier is used. This will replace a former like-named workspace. 
If the Password is present, Subsequent )LOAD or )COPY of that library 
workspace must supply the password. 


)SAVE NEW CVERSION] 
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)DROP 


)DROP Wsid [Password] drop account library workspace 


7A. workspace in the account library can be destroyed by using )DROP. 
The password is required if the workspace is locked. A workspace can 
not be dropped from any other account. 


)DROP NEWLVERSION] 


Oe. 


) FILES 
)LIB 


LIBRARY CONTROLS. 


The library of an account includes named files and workspaces. 
Commands to interrogate the names and to totally or selectively access 
workspaces are provided. File access is done through primitive file 
system operators. 


) FILES display account file names 
The names of files owned by the account are returned. Only the public 


part of the name is displayed; any password on a file is omitted. 


) FILES 
DATAFILE 
DOCUMENT 


) LIB display account library names 
The identifiers of workspaces in the account library (but not their 


passwords) are displayed. 


)LIB 
NEW 
TEXTEDIT 


The form for referencing workspaces in the following )LOAD, )COPY, and 
)PCOPY commands is: 
Workspacename is (Account) Wsid [Password] 


The Wsid is the identifier by which the workspace is known. It must 
start with a letter followed by 0 to 11 letters or digits. 


The Account portion is the owning account; the account library in 
which the workspace resides. It may be elided if it is in the user's 
own account. 


The Password is used only if the workspace is locked. The password is 


also a name starting with a letter and followed by 0 to 11 letters or 
digits. 
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)FNS 
)VARS 
)GRPS 


YWSID 
)ERASE 


NAME DISPLAYS. 


The following system commands display classes of names currently in 
the symbol table: 


)FNS Name display function names 
)VARS Name display variable names 
)GRPS Name display group names 


If name is absent, the entire class is displayed in alphabetical 
order. If Name is present, only the members of the class starting 
with (or after) Name are displayed. The display result can not be 
used as an APL data object. The system function DNWZ, name list, 
should be used for that purpose. 


)WSID Name workspace name 


The workspace name provides a reference for the workspace when saved 
in the account library. The clear workspace is unnamed. 


\WSID 

IS UNNAMED WS 
\WSID NEW 

WAS UNNAMED WS 
)WSID 

IS NEW 


ERASE NAMES. 
)ERASE Nameset erase namelist 


Names of functions, variables and primary names of group names’ in 
Nameset are erased from the workspace. The names in Nameset are 
entered, separated by spaces. Function names can not be erased while 
the state indicator is non-empty. Notice is given for non-existent or . 
non-erasable members of its nameset. See discussion in Group commands 
following: 


JERASE WX Y 2 
NOT Y 
NOT Z 
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)SI 
)RESET 


RUN STATE. 


The run state is the record of user defined functions in process, 
suspended, or pending completion of other called functions. 


) SI state indicator 


The result is the stack indicating the run state of suspended and 
pending functions. The first line (if non-empty), is the most 
recently suspended function. Below are pending functions (awaiting 
completion of functions above) and earlier suspended function. 


Fach line gives function name, bracketed line number at which 
execution iS pending or suspended, and, an asterisk for suspended 
functions only. 


ST 
RUN[1I* 
MAIN(S5] 
RUNL4 Ix 
TEST(L6]* 


A function can appear more than once in the state indicator. In line 
5, MAIN called RUN. MAIN is pending completion of RUN. More than one 
suspended function can appear. A function can reappear (independent 
restarts, or recurSive calls are permitted). 


Usually the state indicator should be emptied of unnecessary entries, 
aS space 1S consumed and global names may be shielded by local labels, 
variables or arguments of functions in the state indicator. 


The suspended function at the top of the state indicator may be 
restarted by entering -7,where W 1s a_ line number. The suspended 
function and any pending on it may be aborted by entering +. Response 
is a line showing the next suspended function if any. 


RUNLuI* 
pene 

RuNCud* 

PES ET 6.1% 


) RESET state indicator reset 


The entire run state can be cleared uSing )RESET. The resulting state 
indicator is reset: 
)RESET 


or 
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JATTACH 
)DETACH 


)GRP 


GROUP COMMANDS. 


A group of names can be formed and named for collective reference 
including )ERASE or )COPY. 


)ATTACH Groupname Nameset group association 


The Groupname is the referent for the group. The Nameset provides the 
names that are associated with the group, and thereby, with each 
other. Normally, names in a Nameset match names of variables, 
functions or other groups. Names in the Nameset need not have any 
current meaning. 


If Nameset is not present, the effect is to reserve Groupname, aS a 
group, for subSequent attachment of a nameset. If the group Groupname 
already exists, the effect is to unite Nameset with the nameset 
already associated with Groupname (no name will be duplicated). 


A group name included in Nameset causes the elements of that group's 
nameset to be implicitly included in the group. 


If the Groupname is included in its own Nameset, then actions on the 


group apply also to the Groupname. 


JATTACH GROUP1 FNAME VNAME GROUP1 
YATTACH GROUP2 GROUP1 GROUP2 HOW 


)DETACH Groupname Nameset group disassociation 


The names in Nameset are detached from the group Groupname. If 
Nameset is absent, then the group Groupname ceases to exist. 


Detach doesn't affect the existence of the names (other than 


Groupname). This is contrasted with )ERASE which eliminates the named 
objects. 


DETACH GROUP2 


)GRP Groupname display group association 


The names directly attached to Groupname are displayed in the order 
they were attached. 
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A group can contain in its Nameset its own name. If so, an action on 
the group nameset affects the group as well. A group (Say G) can 
contain names of other groups. If so, an action on group G will 
replace each named group in its Nameset by that group's nameset. Any 
one group will only be replaced once. A second occurrence of a group 
name means the name itself rather than replacement. More than two 
occurrences of a group are ignored. The primary definitions of names 
in a Nameset are the unique names after substituting for first 
occurrence of any Groupname its Nameset, and retaining the Groupname 
on its second occurence. 


) CLEAR 
CLEAR WS 
JATTACH A _ B 
JATTACH B B C¢ 
JATTACH C A OD 
)GRPS 
ABC 
JERASE A 
NOT D 
)GRPS 
C 
)GRPC 
A D 
The illustrations at the right show A 
the nameset tree for group A after | A 
substitution of group namesets; and B J\\ 
the resulting primary definitions. | “SB A D B 
Note that the primary definitions C 
include groups A and B, and | Sp 
undefinec name D. A primary 


nameset tree definitions 
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SECTION 6 


SYSTEM VARIABLES AND SYSTEM FUNCTIONS 


GENERAL. 


The system variables provided within each workspace of the APL 
processor specially tailor the processing to the application of that 
workspace. 


The system functions are provided to permit the user to perform many 
functions that query or alter the run environment of the account or to 
query the total environment of the APL system. 


The classes of system functions include: 


Function transformations 
Name functions 

Debugging aids 

Execution controls 
Special character sets 
Status inquiries 

I-bar primitive functions 


SYSTEM VARIABLES. 


System variables are provided in a workspace and used by the APL 


processor to specialize its 
variables may be made local to a defined function. 


behavior for that workspace. 
Values in 


limited ranges may be assigned to these variables. 


system Name 
Variable 


OCT on Compari- 
son 
Toler=- 
ance 


ODIO on Index 
Origin 


(IPP on Print 
Precision 


ORL on Random 
Link 


‘Purpose 


relative tolerance used 
in comparison with the 
primitive functions: 


nucof L<s=2>#e€1(DYADIC) 


origin for ordinal 
counting applies to the 
primitive functions: 


1AV?C 1a 


The precision with 
which fractional or 
scientific notation 
numbers are rounded and 
printed, or formatted 
with monadic ¥ 


Starting value for 
random number generator 


Default Value 
in clear WS 


1F 10 


10 


131131704506 


These 


Range 
for n 


O THRU 1 


0 OR 1 


1 THRU 12 
INTEGER 


O TO 1+2*39 


The comparison tolerance is a relative tolerance used in comparisons. 
It helps resolve the problem of the finite precision with which 
numbers are represented within the computer. In a dyadic function the 
comparison tolerance is relative to the left argument. For example: 


A=B+>]CT2|(A-B)+A 
A<B<7QCT2(B-A)+A 


The comparison tolerance is also used for domain checking where the 
domain of the function iS non-continuous, e.g., integer or Boolean 
domain. 


The index origin affects the denumeration of elements and the 
coordinates in an array. 


origin denumeration begins with 


0 0 


s 


1 1 
The index origin affects the following: 


& permute (dyadic left argument) 


1 indices (monadic), index (dyadic) 
AY grade up, grade down 
? roll (monadic), deal (dyadic) 


subscripts on arrays [bracketed] 
coordinate selector [bracketed] 
laminator [bracketed] 

file component selector [bracketed] 


The print precision affects the result of all numeric outputs in 
fractional or exponential form. No more than () PP significant digits 
are displayed. Rounding is envoked first. Integers are displayed 
with full precision so long as their magnitude is less than (2*39)=-1. 
Also, print precision affects the character object result of default 
formatting uSing ¥. 


The random link affects the result of the roll and deal functions. 
The random link is used as the seed to the random number generator. 
Each time the random number generator is used the seed is used to 
determine the next value(s) delivered. Each use delivers a result and 
changes the seed. Given the same seed and same range, the random 
number generator will generate the same random numbers (and return the 
same new seed). 
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FUNCTION TRANSFORMATIONS. 


System Name 


Function 


NCR WN Canonic 


Representation 
OVR N Vector 
Representation 
OFX C Fix 
Canonic Representation 


Result 


Character matrix. Each row 
is line of function N. 
First row is function 
header. Line numbers and 
opening and closing dels 


are omitted. 


Character vector with each 


line of function N 
terminated by return 
character after the last 
non=-blank. 

Defined function. Function 
name will be that from 
first line of C. If that 


name is local to function, 
the fixed function is also 
local. If an explicit 
result is required, it is 
the name of the function. 

of 


a function is 


function editing routines where line rearrangement, 
Note that the shape of the result is number 


or Separation is desired. 


of lines (including header) by length of longest line. 


Remarks 


N is name of 
unlocked de= 
fined function. 
If not, result 
has shape 0 0. 


N is name of 
unlocked de= 
fined function. 
If not, result 
is empty 
vector. 


C is either 
character 
vector or 
matrix in form 
from canonic or 
vector rep=- 
resentation. 


useful for user-written 
function merging 


Thus this form 


generally takes more space than vector representation, particulary if 


the line lenghts differ. 


The Vector Representation is usually the more compact representation, 
and is the preferred form for storing functions as file components. 


A Fix of a character representation returns the function in unexecuted 


form. This form takes 
after first execution. 


If the defined function 


function in the calling sequence resulting 
the fixed function is local to that function. 


the time of the Fix must 


the same space as a )COPY; 


name resulting from a 


not be assigned a meaning. 


slightly more than 


Fix is local to some 
in executing the Fix, then 
Of course, that name at 
The definition of 


the fixed function disappears upon exit of the function to which the 


fixed function is local. 
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NAME FUNCTIONS. 


Name system functions work with a string or matrix of names. 


System Name 

Function 

OWL W Name List 

ADWL WN Selective 
Name List 

OWe C Name 
Classifi-~ 
cation 

DEX Cc Expunge 


A character 


contain only one name. 


name per row. 


The most local occurrence of 
kind. 
local occurrence aS a 
pending or 
global meaning returns 


determines its 
execution, 


is local. 


Result 


Matrix of names of 
objects of specified 
kinds in the current 
environment. Names 
are alphabetized, left 
justified, one per 
Yow. 


Like Name List except 
only includes names 
starting with a char- 
acter in String A. 


Vector of integers 
indicating in the 
current environment 
for corresponding 
name in character 
string or matrix C. 


If required, the 
result is a Boolean 
vector with ones 
everyplace the 
corresponding name 
from C was expunged. 


a name 


Remarks 


N is numeric scalar or 
vector selecting 
object kinds: 

1 labels 

2 variables 

3 functions 

4 other (groups) 


A is chosen from letters, 
underscored letters, A 
and A 


Result value meanings: 
no associated object 
label 

variable 

function 

other (group) 


EWN =| © 


Objects corresponding 
to names in character 
vector or matrix C 

are expunged. The 
objects must not be 
labels, groups or 
executing, suspended or 
pendent functions. 


string argument to name classification or expunge must 
A character array argument must 


contain one 


in the current environment 


More global occurrences may be shielded by a 


local name or label ina 
suspended in the state 
upon exit from the function to which the name 


function currently in 
indicator. The more 


Expunge may be used to eliminate current meanings for objects from the 


current 


environment so_ long 
currently in execution, pending or 


as they are not labels or functions 
suspended. 


Unlike )ERASE, local 


variables or functions not in the state indicator can be expunged. 
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DEBUGGING AIDS. 


The following system functions are oriented to lines of unlocked user- 
defined functions. 


Monadic Name Dyadic Result 
All lines Specified 
Lines 
OsSr F Set Trace N OST F L 
Oss F Set Stop N OSS F L 
OSM F Set Monitor N OSS F L 
ORT F Reset Trace N ORT F L 
ORS F Reset Stop N ORS F L 
DORM F Reset Monitor N ORM F L 
Her F Query Trace B 
Has F Query Stop 
QM F Query Monitor B 
OMV F Monitor Values N OMV F V 
Where 
F is character vector name of unlocked user-defined 
function 
N is numeric vector of line numbers 
L is numeric vector of lines with property (set, reset); 


this result is returned only if required. 

B is Boolean vector, 1 if property set, 0 if reset 
one element per line including header. 

V is vector of numeric monitored values accumulated 
during executions since set. 
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The monadic forms apply to all lines including the header line 0. The 
dyadic forms apply only to altering the current setting for line 
numbers in the left argument. 


During function execution the effects of the aids are as follows on 
encountering a line in which set: 


header line 0 body line 
Trace result returned by function result 
Stop suspend prior to return suspend prior to execution 
Monitor increment number of calls increment CPU time in 


line execution 
The trace result forms are: 
Functicn=name [Line-number ] 
Function=-name [Line-number] Type (Shape) Value 


The first form occurs if no result is possible; otherwise, the second 
form occurs. 


The type is C for character or N for numeric. The Shape is a numeric 
vector; the Value is the normal displayed value. 


The stop result form is: 
Function-name [Line-number] * 


The monitor values are internally accumulated to more precision than 


they are displayed. The celling of the accumulated number of 
milliseconds is displayed. A time of 0 is shown only for unmonitored 
lines or monitored lines that have not been executed. Thus, 


monitoring all lines over a period of execution is an effective way to 
determine if some program path has reached each line, and also the 
time spent in each line. 


If a line contains a call on another function, any time spent in that 


called function would be accumulated there, instead of in the calling 
line. 
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EXECUTION CONTROLS. 


The normal execution can be altered using the following system 


functions. 

System Name 
Function 

ODL D Delay 

OFD S Edit 

B OED §S Phrase Edit 


OFR S Error 


The specified Delay amount D is 
execution pause before 


Result 


Optional actual 
delay D 


edited line after 
editing 


edited line after 
editing string S 
according to 
Boolean vector B 


error message S dis- 


played, no other 
explicit result 


resumption. The 


required, also includes time awaiting 
specified delay has occurred. 


Remarks 


in seconds 
uses normal line 
editing on string S 


ones in B are 
phrase terminators 


use in locked function 


an integer indicating minimum desired 
actual delay, returned 
an APL processor once 


Each Edit function accepts a character string as right argument. 


string may not include 
return, backspace, tab or null. 


phrase for editing. 


any of the following 


of entered edit characters. 


The Error message is displayed, an error indication prompt is given, 
This is principally useful in 
In that case, the error message results 
in the line of the 
the call, rather than in the 


and execution is suspended. 


function. 
point indicator being 


The next line displays 
entry of the next phrase, etc. 
argument (of same length as the 

This avoids the line 


characters: 


linefeed, 
The monadic form displays the string 
and returns to the left margin for entry of a line of edit characters 
applied to the characters above: ' ' for delete, '.' for phrase end 
before, and spaces for no change. 

The ATTN causes 
The dyadic form uses the Boolean left 
String) with each one indicating a phrase end. 


the first 


a locked 
in the suspension 
calling function containing 
line containing the error message. 


SPECIAL CHARACTER SETS. 


The special character sets below are niladic value returning system 
functions. 


System Name Result Remarks 

Function 

OB Backspace scalar backspace character in same line 

OL Linefeed scalar linefeed character no return 

OR Return scalar carrier return character includes line feed 
Or Tab scalar tab character to next physical tab 
ON Null scalar null character no effect on display 


OA Alphabet character vector ‘ABC...2Z' 
UD Digits character vector, '0123456789' 


These characters are processed internally to APL just as any other 
elements of a character data object. The only special properties of 
the first five are associated with output processing for terminal 
display. 


The Backspace character can be used to create overstruck output 
characters not in the allowed character set. It can not be used to 
move to the left of the start of the display line. 


The Return character causes completion of an output line, just as the 
RETN key does for input. It includes both line feed and cursor return 
to the left margin. 


The Linefeed character can be used for advancing the display line 
while the cursor is positioned into a line with return. 


In cases where the cursor is at the left margin, the Linefeed and 
Return have the same external effect. 


The Tab character can be used to prepare output with irregular 
terminal physical tab settings. In this use, the normal APL editing 
to insert tabs in output for display should be disabled. The tab 
interval should be set to 0 by )TABS 0. 


The Null character takes one unit of transmission time when’ sent to 
the display, but has no visual effect on the normal static display. 
Its principal use will be with non-standard display devices such as 
plotters that may require time to complete a prior command. 
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STATUS INQUIRIES. 


The status inquiries below are niladic value returning system 
functions. 


System Name Result Remarks 
Function 
OPT Print tabs uniform tab interval assumed set by )Tabs n 


for terminal 


OPW Print width maximum characters per set by )Width n 
display line 


OWI Workspace ID character vector: )WSID 
workspace identifier 


DAN Account name character vector: 129<>JAN 
account identifier 


HALF Accounting computer time, connect in milliseconds 
Information time this session 
OLC Line count numeric vector: includes I27<->DLC 


line on which line count 
occurs, then other line numbers of 
functions in the state indicator | 


OTs Time Stamp numeric vector: year, Example 
month, day, hour, minute, 1974 12 31 
second, millisecond 23 59 59 999 

HVUL User load number of user accounts 123<-QUL 
on APL 

(WA Working area bytes remaining, 122+ >1+0WA 


bytes in use in workspace 


UWA Name area slots remaining, slots 131,130<>0NA 
assigned in name table 


OLA Library area workspace slots remaining, 133+ 71+0LA 
workspaces in )LIB 


OFA File area File slots remaining, 
files in )FILES 


The use of the above status inquiries are generally preferable to the 
related I-bar primitives. The sum reductions of the last two area 
inquiries provides the quotas established by the installation for the 
account. The sum reduction of Name Area is the number of symbols in 
the name table, set by )SYMS n for the clear workspace default, or 
)CLEAR n for a particular workspace. 
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I-BAR PRIMITIVE FUNCTIONS. 


The set of monadic primitive functions defined in early APL systems 
for querying the environment have the form: 


IN 
where N is an integer between 20 and 33, excluding 28. 


These primitives are redundant, having been replaced by the system 
functions. Since they may exist in old APL programs, they are 
described here. Note that replacements may have different units, or 
may be vector instead of scalar. 


Time units below are sixtieths of a second for I-bar results: 


Approximate 
Primitive Result Replacement 
120 Scalar time of day 3407S 
TO4 Scalar CPU time used this session 1+OAT 
122 Scalar bytes remaining unused in the 1+OWA 
workspace 
I23 Scalar number of users currently signed on OUL 
T2u Scalar time of day at start of the work 1+0AI 
session 
I25 Scalar date in form MMDDYY where M,D,Y are 1001100/1¢3+t017S 
digits representing month, day, and year 
respectively 
I26 Scalar first element of I27 14+C1Lc 
I27 Vector of line numbers in state indicator. OC 
First element is line being executed, or the 
one last suspended. The next element is the 
line which called the first, or the prior 
suspension, etc. 
I29 Character vector containing account TAN 
identification. 
T30 Scalar positions used in name table 1+UIWA 
r31 Scalar positions available in name table 1+ONA 
132 Scalar CPU time remaining before use quota is 
exhausted; if 0, then no quota exists. 
133 Scalar workspaces remaining unused 1+OLA 
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Note that there is no I-bar 28, keyboard unlocked time,implemented on 
some other APL implementations. This time is not available in APL/700 
Since the actual times for keyboard unlocking (after completion of 
transaction processing and any display information) and for acceptance 
of data from a terminal are queued and not known to the APL processor. 
A high approximation to this time is the difference between the 
connect time and CPU time this session. It should be reduced by the 
time for transmitting display information, and the queueing time 
awaiting an APL processor. Neither of these times are available in 


APL/700. 
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SECTION 7 


FILE SYSTEM OPERATORS 


GENERAL. 


The APL/700 System includes a filing system which provides users with 
effective and convenient means to retain and access APL data objects 
outside the workspace. Defined functions can be represented as data 
objects and subsequently can be fixed back into the functions. Thus, 
a user can work with more data or functions than will fit ina 
workspace at one time. 


FILE NAME. 
Each file has a name unique among the file names of the account. 
File Name is (Acct) Name [Password] 


where File Name and optional Password are strings of 1 to 12 
alphanumeric characters starting with a letter. 


The optional Acct is the account name required if the file is owned by 
another account. The Acct is a string of 1 to 6 alphanumeric 
characters. 


FILE COMPONENTS. 


At any time a file has a number of components. These are numbered 
starting with the index origin. Any component may be null, or may 
contain a value. A component can contain any APL data object created 
in a workspace and subsequently assigned to the file component. Each 
component is independent, and can have any type, rank or size. In 
particular, some components can be user created directories to the 
file. A null component is one that has no value (this is different 
from containing an empty vector as a value). 


FILE LIMITS. 


Any file has a maximum of 1000 component slots. The installation 
allocates to an account a maximum number of files, and a maximum 
number of bytes per file. There is a system imposed maximum number of 
files that can be concurrently opened by any one user. 


FILE OPENING, ACTIVE AND INACTIVE STATUS. 


A file may be open in one or more accounts. A file has active status 
if any account has the file open, otherwise, the file is inactive. 


A file is opened for an account when first any file operation is 
executed other than create, rename, destroy, or file existence test. 
A file remains open until either explicit release, or account sign- 
off. 


NOTES. 


The file system operators for APL version 2.6 are being extended in 
utility for version 2.7. 


File updating integrity over system failure has been improved. The 
period over which an update transaction occurs may be extenSive. Any 
transaction entries while the user has the file held are proviSional. 
They become permanent only when a file free is executed as part of a 
user-defined function. Any return to calculator mode before the free 
occurs removes the provisional transaction. This capability protects 
the file from being partially updated. 


Some file operators return the file name if required. This permits a 
sequence of file operations to be executed in the same line of a 
defined function. 


Additional operators are provided including file rename, file reverse, 
file compress, file expand, file release, and some additional queries. 


One restriction is added. A file can not contain more than 1000 
components. 


FILE SYSTEM PRIMITIVE OPERATORS. 


A group of primitive operators is provided for file management. Each 
file operator is denoted by overstriking the quad (box) symbol with 
another symbol. The resulting operator has generally similar meaning 
to the APL primitive functions using the same second symbol. 


Many of the file operators have both monadic and dyadic forms. The 
right argument of each is the File Name, symbolically represented as 
tpt. 


FILE CREATE, CHANGE PASSWORD, RENAME AND DESTROY. 


A file can be created or destroyed, and its pass- 


word or name can 


Forms: 


Where: F is 

G is 

O is 

N is 
Actions/Results: 


Create: 


Change 
Passwords: 


Rename 
File: 


Destroy: 


A CREATE FILE 
WA CHANGE PASSWORD 
iA RENAME FILE 


be changed. M DESTROY FILE 


Create file 
Change password on file 
Rename file to become G. 
Destroy file 


own account File Name, may include password 

new File Name for own account 

old password for file F, empty if none previously 
new password for file F, empty if none desired 


Creates file with name File Name and no components. 
If required, the file name is returned. 
Does not open file. 


Changes password on exiSting file. 
If required, the file name is returned. 


Renames file F to become G. Does not open file. 


The file File Name owned by this account is destroyed 
if it exists and is not currently held by any other 
user. 

If required, returns 1 if successful, 0 otherwise. 


Conditions/Options: 


Create: 


Change 
Password: 


Rename 
Files: 


Destroy: 


Examples: 


File name must not already exist in account. 


Only the file owner can change the password. This 
can only be done when the file is not held by 
another account. 

Add password if O is empty. 

Change password if O and N are not empty. 

Delete password if N is empty. 


A file can only be renamed if inactive. 


The File Name including lock if any must be provided. 
A file of another account cannot be destroyed. 


A'NEWFILENAME' 
W'LOCKEDFILELKEY]' 

A’ NEWPILENAME(L /KEY1]" 
M'*LOCKEDFILELKEY]' 


(=o 


4 NULL COMPONENT 
WRITE COMPONENT 
im READ COMPONENT 


FILE COMPONENT NULL, WRITE AND READ. 


Specific file components can be set null, written into or read. 


Forms: 


Bh CK] F 
Ab CK] F 
{{ [CK] F 


Where: 


NULL component K of file F 
WRITE A to component K of file F 
READ component K of file F 


F is File Name 
K is component number 
A is any APL data object 


Actions/Results: 


NULL: 


WRITE: 


READ: 


Destroys prior value of component K. 
If required, returns File Name. 


Replaces prior value of component K by value A. 
If required, returns File Name. 


Returns the non-null value of component K. 


Conditions/Options: 


NULL: 


WRITE: 


READ : 


Examples: 


2 5 
SMITH 


K must be an existing component number. 


K must be either an existing component number or one 
greater than the prior last component number. In the 
latter case, an append to the end is done instead, 
(This append is not available in 2.6 release). 


The component must be nonenull. 


BC 3)J' FILENAME ' 

2 SHL2]'FILENAME' 
'SMITH'RCL3]'FILENAME' 
(2]'FILENAME' 
MC3]'FILENAME' 


K READ AND POP FIRST 
Kk APPEND BEFORE 


Bb] READ AND POP LAST 
B} APPEND AFTER 


FILE COMPONENT POP AND APPEND. 


The file components may be treated as a stack or a queue. A component 
may be appended to either end. The component at either end may be 
read and removed (popped). 


Forms 


KF Read and pop first component of File 

BF Read and pop last component of File 
ARF Append component before components of File 
A BF Append component after components of File 


Where: F is File Name 
A is any APL data object 


Actions/Results: 


Pop: The result returned is the indicated first (last) 
component. That component must be non-null. 
The popped component is removed from the file. If 
first, the component numbers of the old components 
are decreased by 1. 


Append: The data object is appended before (after) the 
existing file components. If before, the component 
numbers of the old components are increased by 1. 


If required, the file name is returned. 


Examples: 


'JOWES'K 'PERSONS'* 
'"SMITH'R' PERSONS! 
(2 209114 7) R'FILENAME' 
KR 'PERSONS' 

JONES 
K' FILENAME ' 


44 
47 


77) 


(GQ REVERSE ORDER 


QO ROTATE CIRCULAR 


FILE COMPONENT REVERSE AND ROTATE. 


The component order may be reversed or circularly rotated. Like the 
primitive reverse and rotate functions. 


Forms: 
6 F Reverse component order in file 
I QF Rotate circularly the components in file 
Wheres: F is File Name 
I is integer 
Actions/Results: 


Reverse: The component order of File F is reversed; 
i.e., the first changes with the last, 
the second changes with the second last, etc. 
If required, the File Name is returned. 


Rotate: The components of file F are rotated circularly by an 
amount I. 
If I is negative, this is effectively a right rotate. 
If required, the File Name is returned. 


Conditions/Options: 
Reverse: Not available in 2.6 release. 
Rotate: I is effectively the (number of components) residue 


of I. I=1 causes the first component to become the 
last, the second component to become the first, etc. 


Examples: 


B' FILENAME! 
20'FILELLOCK]' 
~ 30'FILENAME! 
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A TAKE COMPONENTS 


M DROP COMPONENTS 


FILE COMPONENT TAKE AND DROP. 


The remaining file components may be the result of taking or dropping 
components from either end. These are like the primitive take and 
drop except that they are destructive of components dropped or not 
taken. 


Forms 
I fF «+ Take I components from File 
I fF Drop I components from File 
Where: F is File Name 
I is integer magnitudes 1000 
I>0 applies to components from start of file 
I<0 applies to components from end of file 
Actions/Results: 
Take: The resulting file F has I components. 
If required, the file name is returned. 
Drop: The resulting file F has I components dropped. 


If required, the file name is returned. 


Conditions/Options: 


Take: If the magnitude of I exceeds the number of components 
previously in the file, sufficient null components are 
appended to the file at the appropriate end: 


before if I<0 
after if I>0 


Drop: A minimum of 0 components remain. 


Examples: 


SW' FILENAME! 
~ 23RN' FILENAME! 
2M' FILENAME! 


17 


Zi COMPRESS COMPONENTS 


N EXPAND COMPONENTS 


FILE COMPONENT COMPRESS AND EXPAND. 


The ordered set of file components can be expanded or compressed. 
These operators are similar to the primitive expand and compress 
functions. 


Forms: 
BUF Compress components of File 
BN F Expand components of File 
Where: F is File Name 
B is Boolean vector 
Actions/Results: 


Compress: The result is an ordered component set selected 
in order from the components previously in F, 
wherever a 1 exists in the Boolean B. 
The components of the original file are destroyed 
wherever a 0 exists in B. 
If required, the file name is returned. 


Expand: The result is an expanded, ordered component set 
preserving the order of the original components 
within which null components are inserted wherever 
zeros exist in Boolean B. 

If required, the file name is returned. 


Conditions/Options: 


Compress: The length of B must be the same as the number of 
components in the original file F. (p8)=36F 


Expand : The number of ones in B must be the same as the number 
of components in the original file F. (+/B)=3F 


Examples: 


A' FILENAME! 
1 N' FILENAME ' 
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FILE EXISTENCE AND QUERY. 


lb] FILE EXISTENCE 
fo] QUERY FILE ATTRIBUTE 


The existence and attributes of a file can be determined. 


Forms : 
b} F Test existence of file 
I bp] F Query attribute of file 
Where: F is File Name 


I is integer 


Actions/Results: 


Existence: Result is Boolean: 1 if file named F exists, 0 
otherwise. Does not open file. 


Query: 


Conditions/Options: 


Result 

Current size of file in bytes. 

Maximum size of file in bytes. 

Number of components in file, including nulls. 
Boolean, 1 if any modification since file was last 
organized. 

Number of accounts with file open. 

Cycle number of last reorganization. 

Last update time stamp. 


Query: The options marked with * are not implemented in 2.6 
release. 


2 
3 
5 


Maximum size of file is an installation option. 
Maximum number of components is 1000. 

Whenever the number of accounts with file open goes 
to 0, the file is reorganized if it has been 
modified. 

Reorganization causes merging of the update file 
into the main file. The reorganized :‘file 

is compact and in indexed sequential form. The file 
becomes temporarily unavailable during reorgan- 
ization. Reorganization is initiated any time the 
file becomes inactive. 

The time stamp is a 7 element vector = year, month 
day, hour, minute, second, millisecond - indicating 
time of last modification to the file. 


6 
7 
Examples: 
bl* FILENAME! 
1 
b*VOSUCH' 
0 
3e])"'FITLENAME' 
14 


a 


1E COMPONENT MAP 


FILE COMPONENT MAP. 


The components of a file that are null and non-null can be determined. 


Forms 
BF Determine map of file 
Where: F is File Name 
Actions/Results: 
The result is a Boolean vector with length 
the number of components. In component order, 
the resulting element is 0 if the corresponding 
component is null; 1 if the corresponding component 
is non-null. 
Example: 
N'FILE' 
123 4 B'FILE' 
3 A'FPILE' 
E'FILE' 
100 
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W HOLD FILE 
M FREE FILE 


NH PREEMPT HOLD 


FILE HOLD, FREE, PREEMPT. 


In file use shared among several accounts, excluSive use can be 
achieved for critical updates. 


Forms: 
AF Hold file for exclusive use 
MF Free hold on file 
RF Premptively hold file 
Where: F is File Name 
Actions/Results: 
Hold: If the file is not currently being held, 
a hold is placed on the file which prevents any other 
account from accessing it. 
If already held by another account, hold causes a wait 
until freed. 
If required, the file name is returned. 
Free: A held file is freed from exclusive use. 


If required, the file name is returned. 


Preempt: The account owning the file can preemptively break an 
existing hold by some other account and place its 
own hold on the file. 
This causes any up<-date in progress by the other 
account to be discarded. 
If required, the file name is returned. 


Conditions/ Options: 


Hold: A hold only persists while execution continues in a 
defined function. Any return to calculator mode 
(or file destroy while held) breaks the hold. 


Free: In version 2.6, actual file up-dates take place as 
indicated by the file operations. 
In version 2.7, the actual file up-dates take place 
provisionally into the up-date file. 
They are accepted as up-dates when the free occurs. 
Any interruption before the free voids the provisional 
entries. 


Examples: 


A' (OTHER )FILE' 
M' (OTHER )FILE' 
A'FILE' 
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fb] FILE SYSTEM INTERROGATE 


FILE SYSTEM INTERROGATE. 
Usage properties of the file system can be determined. 
Form: 

| I Interrogate file system 

Where: I is integer 


Actions/Results: 


I 
1 Returns current number of accounts using files. 
2 Returns current total number of files that are active. 


Conditions/Options: 


Neither number may exceed installation set maxima. 


Examples: 


ot 
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SECTION 8 
ERROR REPORTS AND INTERPRETATION 


GENERAL. 


The APL/700 System has a comprehensive error-reporting capability that 
aids users in determining the cause of errors and resultant corrective 
action. This capability is one of the advantages of the conversation- 
al, interactive APL/700 environment in that it enables the user to ex- 
periment very easily by the trial-and-error method. However, the user 
should be careful not to incorrectly generalize or misinterpret the 
results of his experimentation. 


This section provides descriptions of the various types and forms of 
errors and provides sufficient background information to aid the user 
in experimentation or interpreting and correcting errors. A complete 
listing of APL/700 error reports is contained in Table 8-1. 


ERROR REPORT FORMATS. 


When an instruction/command is entered into the APL/700 System, the 
computer attempts to execute it. If the computer cannot complete the 
execution process required, it stops and returns an error message to 
the user terminal. Each error message consists of up to three output 
lines, as applicable. The first line is always a typed report identi- 
fying the error in the following format: 


*#**XERROR REPORT*** 


If an error occurs during a definition mode, the message also contains 

a second line which restates the instruction in the form that the sys- 

tem reads it. The third line contains a caret symbol (A) marking the 

point in the instruction at which the operation encountered trouble and 
could not continue. For example, if the length of a vector argument is 
incorrectly stated for an operation using one or more vector arguments, 
the entry and error message format is as follows: 


8 6 Tt5 3 
¥*¥* LENGTH ERROR*** 
8 6 Tt5 3 
AN 
The one variation to the above format is in the case of the "CHARACTER 


ERROR" report, where an invalid overstrike was typed to form an invalid 
character (such as overstriking x with +). The squat quad (0) symbol 
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(vpn overstruck with nim) is used instead of the caret to mark this 
error. 


The "Report" column of Table 8-1 lists, in alphabetical order, all of 
the possible error reports provided by APL/700. Each report is dis- 
played in the exact form shown in the column, except that it is suf- 
fixed and prefixed by asterisks (stars) as noted previously. The 
"Definition" column of Table 8-1 lists the system interpretation of 
the cause‘for each report. Where applicable, relevant statements are 
provided to aid in corrective action. 


TYPES AND FORMS OF ERRORS. 


There are several types of errors comprising the complement of error 
reports: the limit type, the file type, and the true error type. A 
limit type error occurs when the user tries to do something which ex- 
ceeds the capacity of the computer or the capability of APL/700.° For 
example, a "SPACE LIMIT" report occurs when the user attempts to use 
more space than is available in his active workspace. As shown in 
Table 8-1, a large number of possible errors relate to file system op- 
erations. For example, a "FILE USERS LIMIT" report occurs when the 
maximum number of file users are currently using the file system and 
an additional request cannot be accepted. A "FILE LOCKED" report is 
returned when the user enters an incorrect lock or no lock in a locked 
file reference. 


Many errors may result from true user or transmission errors, such 

as syntax or context errors. These may be caused by a user typing mis- 
take or a system malfunction. When an instruction is entered by a 
user, first the computer has to read it, then it has to execute it. 

Two types of errors may cause the computer to read the instruction in- 
correctly, or not read it at all. One is a transmission error, which 
may be caused by electrical faults or noisy transmission lines. The 
other is a character error, which may arise when the input doesn't re- 
fer to an allowable APL character, even though the transmission is 
technically adequate. 


User errors are caused by various reasons. The user may misunderstand 
the proper use of an operation, try to carry out a sequence of instruc- 
tions in the wrong order, or have forgotten what value is associated 
with a variable. A great many errors are simply mistypings. The com- 
puter, of course has no way of knowing what the user intended; it ex- 
ecutes the instructions, to the best of its ability, until it encoun- 
ters something that it cannot execute. Then it reports the trouble 
Ahat it has encountered. The system classification of the error is 
the system interpretation of the error; it cannot guess how the error 
departs from what the user intended. For example, if the user mis- 
spells the name of a variable, the computer may read this as a refer- 
ence to some other variable, and it will report an error only if the 
value of that other variable makes the instruction impossible to exe- 
cute. Thus, the computer can't stop and report the spelling error, 
even if it is the true cause of the error. 
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Similarly, if the user types a parenthesis in the wrong location, or 
omits a required entry, the computer can only report what problem it 
encountered as it tried to execute the instruction. Thus, while the 
computer reports the type of error it has found, it can't tell the 
user what he should have typed. This has to be determined by the user 
alone. 


Normally, when the computer finds an error in an instruction, the in- 
struction has to be edited or reentered. The value of an intermediate 
expression within the instruction is not saved, unless the instruction 
specifically directs that it should be stored as the value of a named 
variable. This arises only when there is a specification arrow fur- 
ther to the right (and hence executed earlier) than the caret that in- 
dicates where the trouble is. If the result of an intermediate step 
has been stored, only the part of the instruction that appears to its 
left has to be reentered. 


The following paragraphs elaborate on some of the more common errors 
that may be encountered. 


SYNTAX ERROR. 


When the user enters an expression “whose syntax is invalid, the "SYN- 
TAX ERROR" message is reported. Some examples of invalid syntax en- 
tries are as follows: 


ae Two variable names are juxtaposed (placed side-by-side} wits 
no indication of the operation that is to be performed on 
them. 


b. An operator symbol is used with no indication of a value on 
which it is to operate. 


c. <A parenthesis or bracket is opened but not closed, or closed 
but not opened. 


d. <A defined function is used ina way that is inconsistent with 
the syntax specified in its header. 


DEFINITION ERROR. 


When the user enters an instruction employing the del (Vv) symbol im- 
properly, a "DEFINITION ERROR" message is reported. Some of the in-~ 
correct usages of the definition mode are as follows; 


ae The del (V) symbol is not the first character in the instruc- 
tion, nor within quotes. 


b. An attempt was made to reopen the definition of a function 
whose name appears in the state indicator other than on top, 
or to alter the header line of the suspended function on top 
of the state indicator. In this case, check the state indi- 
cator by entering ")ySsr", Reset the state indicator by enter- 
ing ")RESET". 
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ce An attempt was made to start a new definition for a function 
whose header contains a result, an argument, or a local vari- 
able when a definition for a function of that name exists in 
the workspace. 


d. While in the definition mode, a defective request was entered 
to edit a line of the function. 


DOMAIN ERROR. 


When an instruction entry asks an APL operator to operate on a value 
outside the domain that the operator can handle, a "DOMAIN ERROR" mes- 
sage is reported. A domain error will also occur if an attempt is 
made to divide by zero. 


TYPE ERROR. 


A "TYPE ERROR" message will be reported if the type of entry is incor- 
rect for the operation being performed. That is, if an attempt is 
made to do arithmetic on a value which is not a number, or to catenate 
a literal character object with a numeric object, or to insert charac- 
ter elements into a numeric array, or to insert numeric elements into 
a character array. 


VALUE ERROR. 


When a "VALUE ERROR" message is reported, it indicates that the user- 
entered instruction refers to a name for which no value can be found 
in the designated workspace. This may arise because the user failed 
to assign a value to that name to make it a variable, or because he 
misspelled the name so that the computer does not recognize it, or 
failed to define a function of that name. In this case, the situation 
may be corrected by entering a value for the missing variable, or cor- 
recting the misspelled name. 


Value errors may also arise if an attempt is made to make use of the 
result of a defined function, but the function definition fails to pro- 
vide one. This can be remedied by rewriting the function definition 

so as to provide an explicit result, or (if it already has one ) by 
making sure that the body of the definition in fact specifies a value 
for the result before execution of the function is complete. 


RANK ERROR. 


The rank of a variable is the number of dimensions it has. A "RANK 
ERROR" message is reported if an entered instruction uses variables of 
different rank for a function which requires that the ranks be matched, 
or a variable whose rank is too large for the particular function. 
While the scalar functions extend to arrays of any rank, a number of 
the other functions, such as monadic 1, or the left argument of Q, can 
take arguments only of rank 1 or rank O. 
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Table 8-1 


Error Reports 


ACCOUNT ACTIVE — An attempt was made to sign on an account 
that is already signed on to APL. 


ACCT=-NAME ERROR A reference was made to a nonexistent account, 
or the name was improperly formed. 


BUFFER LIMIT An attempt was made to execute a string longer 
than the buffer, or an attempt was made to set 
the prompt to be a string longer than the 
buffer. The buffer length is 130 characters. 


CHARACTER ERROR An invalid overstrike was entered. The loca-= 
tions of the invalid overstrikes are indicated 


by the squat quad ([{] ) symbol. 


CONTEXT ERROR A name was used out of context with its current 
| definition. 
| CONTROL ERROR A parameter to a command was incorrect. 
DEFINITION ERROR An attempt was made to define a new function 


with a name that already exists, or the func- 
tion header was improperly formed. (Refer to 
Section 4.) 


DIMENSION ERROR The dimension specified does not exist. (This 
occurs with a function which operates on one 
of several dimensions. ) 


| DOMATN ERROR The argument of a function was outside the 
range of acceptable values for that argument 
to the function. 


DUP-NAME ERROR An attempt was made to give a local name multi- 
ple definitions of different classifications. 


| EDIT ERROR Something other thana ' ', '/', or '.! edit- 
| ing control symbol was typed beneath a line 
when in the line edit mode. 


| FILE ACTIVE LIMIT The user has the maximum number of active files 
| permitted; no more requests to make more files 
active can be accepted. 


| PELE ALREADY EXISTS|] An attempt was made to create a file that al- 
ready exists. 
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Table 8-1 (cont) 


Error Reports 


) KE¥XREPoOrte*** Definition 


| FILE ERROR Execution of APL was halted, or a line-drop 
| occurred while a file operation was in process. 


| FILE INDEX ERROR An attempt was made to read or write a com- 

7 ponent of a file that does not exist in the 
file. 

| FTLE LOCKED No password, or an incorrect password, was 


used ina file reference. 


| FILE-NAME ERROR | An attempt was made to use an improperly 
formed name as a file name. 

| FILE NONCE ERROR The file operation referenced is not presently 

| implemented. 

| FILE NONEXISTENT The referenced file does not exist. 

| FILE QUOTA LIMIT An attempt was made to create more files than 

: the account is permitted. 

| FILE SPACE LIMIT | The area reserved for the file has been ex- 

hausted. 


| FTLE SYSTEM ERROR An unexpected execution error occurred in the 

| | file system. (This should be reported to the 
system manager; all relevant output should 
be saved. ) 


FILE SYSTEM LIMIT | The maximum number of files allowed to be 

. | active are currently active; no more requests 
that activate a new file can be accepted at 
present. 


| FILE UNAVATLABLE The referenced file is unavailable at this 


time. 
| PILE USERS LIMIT ; The maximum allowable number of file users 


are currently using the file system; no more 
file users can be accepted at this time. 


| FILE VALUE ERROR | An attempt was made to access a null component 
| of a file. The file operation was completed.. 
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*¥¥Report*** 


FORMAT ERROR 


GRP-NAME ERROR 


INDEX ERROR 


INTEGER LIMIT 


| LNTERRUPT ERROR 
| LENGTH ERROR 


|NAME ERROR 


NONCE ERROR 
{NO SHARES 


NUMBER LIMIT 


PASSWORD ERROR 


RANK ERROR 


RANK LIMIT 


Table 8-1 (cont) 
Error Reports 
Definition 


The left argument to the format operator is 
not a valid format. 


A reference was made to a nonexistent group. 


An index into an array was out of the array 
bounds. 


A number larger than the largest integer that 
may be represented by the machine was used 

where an integer was needed. (The magnitude 

of the largest integer is 549755813887, or 
~1+2*39.) | 
An error was forced at a non-suspendable point 
by striking the attention key twice. | 


The length of a vector is incorrect for an 
operation using one or more vector arguments. 


An argument to a system function requiring a 
name was given an improperly formed name, or 
a name with incorrect meaning was given. 


An attempt was made to use a feature that is 
not presently implemented. 


The shared variable facility is not available 
at this time. 


The result of a computation is a number greater 
than the largest number that the machine can 
represent. (The magnitude of this number is 


4.31359146674E68. ) 
An incorrect password was used. 


The rank of an object is incorrect for the 
operation being done. 


An attempt was made to create a structure 
whose rank was greater than the maximum allow- 
able. (Data structures may not exceed rank 
16.) 
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Table 8-1 (cont) 


Error Reports 


SHAPE ERROR The shapes of objects are incompatible for the 
operation to be performed. 


¢ 


SHARE QUOTA LIMIT An attempt was made to share more variables 
than the processor is permitted to share, 


SHARE SPACE LIMIT An attempt was made to use more shared variable 
space than the processor is permitted. 


SIGN-ON ERROR An incorrect sign-on entry was made. 


SIZE ERROR A one-element object was needed for an opera- 
tion, but it was not found. 


SPACE LIMIT An attempt was made to use more space than is 
available in the active workspace. 


STATE ERROR A edit request was made on a function which 
would cause the state indicator to be incorrect 
if the edit were performed. 


SYMBOLS LIMIT An attempt was made to create more symbols than 


there is space for in the symbol table. (Un- 
less otherwise specified by the user, there is 
space for 256 symbols.) 


SYNTAX ERROR The syntax of the APL expression entry is in- 
correct. 


SYSTEM LIMIT APL encountered an unexpected error during 
execution. (This problem should be reported 
to the system manager; all relevant output 
should be saved. 


TIME-QUOTA LIMIT This error occurs once an account has exceeded 
its computer usage quota. The user session is 
then terminated, and the quota. must be in- 
creased before the account may use APL again. 


TYPE ERROR The type of entry structure is incorrect for 
the operation being done. 


WS=-NAME ERROR A reference was made to a nonexistent work- 
space, or the name was improperly formed. 


Table 8-1 (cont) 


Error Reports 


WS-QUOTA LIMIT A | )SAVE! could not be executed because the 
account has used all available workspace slots. 


Some workspaces must be dropped, or the work- 
space quota for the account must be increased. 


VALUE ERROR An attempt was made to use name (variable) to 
which no value has been specified. 
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Appendix A 


Glossary 
APPENDIX A 


GLOSSARY 
OF 


TERMS, ABBREVIATIONS, AND ACRONYMS 


The following is a glossary of terms, abbreviations, and acronyms 


used in APL/700. 


Term, 
Abbreviation, 


or Acronym 


Across (relative 


to datum di- 
mension) 


Along (relative 
to datum di- 
mension) 


APL 


Argument 


Array 


Array Index 


Array Origin 
Calculator mode 


Comment (APL) 


Definition 


An orientation of a plane relative to the di- 
mensions of a datum. Planes are said to be 
"across" a dimension when they are orthogonal 
(at right angles) to that dimension. A speci- 
fic plane orthogonal to a dimension is some- 
times referred to as being the i-th plane 
"across" that dimension, that is, the i-th 
plane encountered travelling "along" a vector 
parallel to the axis of that dimension. 


An orientation of a vector, relative to the 
dimensions of a datum. Vectors can be con- 
sidered to be "along" a dimension when they 
are parallel to the axis of that dimension. 


A Programming Language. An interactive pro- 
gramming language for describing procedures 
in a time-sharing environment. 


A datum (or list) supplied to a function or 
procedure. 


A datum having shape. An array may be a vec- 
tor, a matrix, or an n-dimensional object and 
may have one or more elements or no elements. 


The index (number location) of an element in 
an array, relative to the origin (usually 0 
or 1) of that array. 


The sub-array selected by holding two or more 
indices at the origin value. 


Normal mode of APL/700 System, in which in- 
structions are executed. 


ef — text prefixed by the lamp symbol 
A). 
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Glossary 


Term, 
Abbreviation, 


or Acron 


Component 


Coordinate 


Corner 


Datum 


Defined 
Function 


Definition 
Mode 


Dimension 


Dyadic 
Function 


Element 


Empty 


Expression 
(APL) 


Face 


File 


Fill 


Function 


Any “element" of a list. An APL value is any 
character or numeric form (scalar, vector, ma- 
trix, or an element of any number of dimensions). 


The entire set of plane indices for a particular 
point (in a matrix or array ), ordered from the 
first to the last dimension. 


Any n-dimensional sub-array having a number (n) 
of its faces that are sub-faces of an n- 
dimensional array. 

A single data object. It may be a scalar or an 
array, but not a list. 


A procedure or program made up of steps contain- 
ing APL statements and operations and used to 
perform a discrete function, such as averaging. 


Mode in which user defines functions (programs ) 
and stores them for future use. 


One of the independent axes of a shape. 
sions are numbered from 1 to n for an n- 
dimensional object (origin 1) or O to n-1 
(origin 0). 


Dimen-= 


A function dealing with two arguments (left and 


‘yight). 


A single scalar object located by a set of co- 
ordinates in an array. 


A size-zero datum. 


A niladic, monadic, or dyadic procedure; a 
value-producing expression; or a mixed output. 


The first or last plane "across" any dimension. 


A workspace extension with components containing 
data objects. 


Objects used to expand the size of a datum. 
Blanks (spaces) are used ior character objects; 
zeroes (O's) are used for numeric objects. 


A value-producing operation on zero, one, or 
two arguments. 


Term, 
Abbreviation, 


or Acronym 


Identifier 


Index 


Index 
Position 


Index 
Sequence 


Iteration 


Lamp Symbol @ 


LSN 


Library 
Matrix 
McS§ 
Monadic 
Function 


Niladic 
Function 


n-Dimensional 
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Glossary 


Definition 


A string starting with a letter, an underscored 
letter, or a delta (A) or underscored delta (A) 
and followed by any number of additional letters, 
deltas, or underscores. 


An integer specifying the position of a scalar 
element along a dimension of an array. 


The position of a plane relative to a dimension 
of datum. Index position "i" of a plane selects 
the i-th plane along a given dimension. 


The conventional order of the sets of indices 
of the elements of an array, whereby the last 
dimension steps through its values most rapidly. 
(As ostealizsas2|{asis3)Ls2ea]ap252]l15 293) 
etc. 


A single execution of repetitive program steps 
or a loop. 


A prefix to denote comment (niladic text). 


Logical Station Number (identifying number for 
each terminal station in network). 


Inactive workspaces stored for later use. 
A rank-2 datum (two dimensions). 


Message Control System (data communications 
control system). 


A function dealing with only one argument 
(always right argument ). 


A function dealing with no argument; produces 
no result. 

A rank-n datum. (A datum having more than two 
dimensions. ) 
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Glossary 


Term, 
Abbreviation, 


or Acronym 


Pendant 
Function 


Plane 


Position 


Prompt (system) 


Rank 


Scalar 


Shape 
Shared Variable 


Size 


Statement 
(APL) 


String 


surrogate 


Suspended 
Function 


Definition 


A function that is awaiting completion of an- 
other function that it called. 


Any “slice" of a shaped object that is ortho- 
gonal to a given dimension of that object. A 
plane "across" the K-th dimension of an n- 
dimensional object is a (n-1)-dimensional object 
with all but the K-th dimension of the original 
retained. Thus a "plane" of a vector isa 
scalar element, and a "plane" of a matrix is a 
row or column. 


An index (location integer) to a list. 


A response (from the APL/700 System) that is 
normally a five-space indentation on the term- 
inal. The terminal is unlocked to accept user 
entries. 


The number of dimensions of a datum. scalars 
are rank O, vectors are rank 1, matrices are 
rank 2, and n-dimensional arrays are rank n. 
A single data object without shape; that is, a 
rank-O datum which may be either a number or 


character. 


A vector specifying the number of planes along 
each dimension of a datum. 


A system variable that is shared among users 
and systems. 


The number of elements in an array. 


An APL expression or comment. 


A scalar or vector of characters. 


A substitute, or secondary name as applied to 
shared-variable handling. 


A function which is currently being executed or 
whose execution was stopped for some reason 
other than a call to another function. 
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Glossary 


Term, 
Abbreviations, 


or Acronym 


system 
Variable 


Text 


Transaction 


Type 
Vector 


Vector Index 


Vector Origin 


Workspaces 
(active/stored) 


Definition 
A variable used by APL/700 to specialize proces- 
sing within a workspace (index origin, print 
position, comparison tolerance, and random link). 


Any string of characters. 


Cycle consisting of user entry, APL processing, 
and display of output, as required. 


Fither character or numeric. 
A rank-1 datum. 


The index which selects each element in a vector 
or one index of the indices of an array which 


selects each element of a vector in an array which 


is described by varying the given index as the 
other indices remain constant. 


A sub-array selected by holding one vector index 
at the origin value. 


Allocated blocks of disk and main memory storage 


for users to perform current transactions /opera- 
tions and save data. 
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| = { 
| | | 
| TRANSACTION CYCLE | TRANSACTION EDIT | 
| | 
| Saamccecesaeesssssatetrateesessesseerseressssssssseersssssess | sseessesesssssssssssassesesssesssssessssessressaseeeasescess | 
| 1. SYSTEM INITIATES CYCLE BY TYPING OUT PROMPT AND | 24. SYSTEM EITHER (1) TYPES OUT TEXT, RETURNS, AND UNLOCKS | 
| UNLOCKING KEYBOARD. | KEYBOARD, OR (2) EXDENTS CURSOR, AND UMNLOCKS KEYBOARD. | 
| 2. USER SPECIFIES TRANSACTION BY TYPING IW TEXT. | 2. USER TYPES IN EDIT CONTROLS. | 
| 3. SYSTEM COMPLETES TRANSACTION BY INTERPRETING ENTRY, | INITIAL INPUT OF -- l 
| TYPING OUT APPROPRIATE DATA OR ERROR MESSAGE, | ATTENTION SYSTEM ASSUMES MODIFICATION AT END OF | 
| AND RETURNING TO STEP 1. | TEXT, POSITIONS CURSOR TO COLUMN | 
[Sst eescesaeaesear as eesneeseesexsaageeerrezeeesssseresssszsrss2: | IMMEDIATLY TO RIGHT OF TEXT, UNLOCKS | 
| | KEYBOARD AND PROCEEDS AT STEP 4, { 
| TYPING RULES | OTRERWISE INPUT OF -- | 
| | wy UNDER CHARACTER OF TEXT 'DELETES'. | 
| Sosa se esas eseeesesses TRIES Sees VesVssseeeszazensesseessszcszs | ‘i? UNDER CHARACTER OF TEXT ‘INSERTS'. } 
| KEY | ACTION [ 3. SYSTEM TYPES OUT REVISED TEXT, STOPPING BEFORE NEXT ! 
Jesseesessaceses | sreseesesesee seas sesteseeensesesessenrssszece | INSERTION POINT, AND UNLOCKS KEYBOARD. | 
| CHARACTER | INSERT CHARACTER INTO TEXT AT POSITION | 4, USER ADDS T0, MODIFIES, OR COMPLETES CURRENT ENTRY BY | 
| | OF CURSOR. | USUAL TYPING RULES. | 
| SPACE | POSITION CURSOR ONE SPACE T0 RIGHT. | INPUT OF -- | 
| BACKSP4CE | POSITION CURSOR ONE SPACE TO LEFT. | ATTENTION PROCREDS AT STEP 3 IF CURSOR TO RIGHT | 
| TAB | POSITION CURSOR RIGHTWARD TO NEXT TAB STOP. | OF CURRENT TEXT AND MORE ORIGINAL TEXT | 
| LIVEPEED | DISCARD TEX? ABOVE AND TO RIGHT OF CURSOR. | REMAINS. | 
| RETVURY | TERMINATE USER ENTRY PORTION OF TRANSACTION, | | 
| SRRSPSSRLSSTAS TS KSSH ASSSSA SSS SATA SASSSS STARS SSS SSS AS SSSSSSSSS SSS ASS A SSS SS SS SS SSSA SASS SS SSSA TSEASRSSSATSKLSSASSATARTcsszezzs | 
[Sareea ae Se eeSeR TESTS TST ASST SSSSASSLSARASASSSSSSASASSSSSSSS SSSA AS SSS SSS SAS SAS TALE KSTSSSSSSSSSSTSS SAS es ese ssssaessrszszzzz | 
| | 
| ATTENTION CONVENTIONS : 
| 
] seseaesn222 + 3-4 SSA ASRS SSS SS SS SSeS ST SSS SSSsess ess sssSR SSS SSeS See sesSsss ess SSeAssssssrsssessssssssseessesssesenaggserzsszsseczs=2 | 
| KEYBOARD |4T7ENTION | | 
| STATE | INPUT Is| ACTION (SEE TRANSACTION EDIT FOR OVERRIDING USES) | 
| saeceese|ess | seseseesce | ssaeseessstesesssssserasaesssrsssseses S2®ZrZe2Se2 2228S S222 E83 S85 SSSZSSSSSSsSssSssBsessesssgessaesgseszreegea 2szegesesss32 | 
| URLOCKED | INITIAL | 
| | | MODE | PROMPT | AFTER VALID ENTRY | AFTER ERRONEOUS ENTRY | 
ee | en ene ee -- eee ee ee | wae ee men nw eer ee ee een nee 
| | | EXECUTION | FIVE SPACES | EDIT MOST RECENT APL BIPRESSION THIS LEVEL. | EDIT ERRONEOUS ENTRY. | 
| ee | ne en en ne en nee | mn ew a ew em ew mm wm en ween eneenn= 
| | | DEFINITION t Eaaad | EDI? MOST RECENT DEFINITION MODE ENTRY. | : 
| [| Jere ene een cee- | ---- eee eee | mn a rn ee mw me wwe enenene | 
| | 0 | O: ZF 3-gP | UNLOCK KEYBOARD. : | 
| ee | one ee ee ee eee ee 
| | o | USER DEFINED | UNLOCK KEYBOARD. | | 
| | em mn | me mn wn nn ee nn ne nn en re nn ce mee mentee nee ee me nn mene eer en arene rnc onenan 
| NON- SYSTEM LINEFEEDS, TYPES ‘v", LINEPEEDS, AND UNLOCKS KEYBOARD. | 
| INITIAL ACTION SAME AS [LINEFEED FOR TYPING RULES. ! 
| www mew wwe | mw we ww ewe | oe wn ce ow we en ow ww ee ww wn ee we we we wn en we wn wo a nn on en en ne ee wee ewww wee en ween ne eenees 
LOCKED SEQUENTIALLY INPUT ATTENTIONS MEAR: | 


DURING EXECUTION OF AN APL EXPRESSION OTHERWISE | 


ay 
A 


PIRST - SUSPEND EXECUTION AND ABORT QUEUED OUTPUT. | 
ABORT QUEUED OUTPUT. | 
SECOND KILL ACTION. | 
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